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VERSION  DESCRIPTION  DOCUMENT 
FOR  THE 

Ada  COMPILER  VALIDATION  CAPABILITY 
(Version  1.10) 


1  VERSION  IDENTIFICATION 

This  document  describes  the  Ada  Compiler  Validation  Capability 
(ACVC),  Version  1.10.  This  version  consists  of  3719  tests  in  41 82  test 
files.  Also,  there  are  three  units  in  four  files  and  three  tests  in  three 
files  which  support  the  running  of  the  ACVC  tests;  one  data  file 
containing  macro  definitions;  one  program  in  one  file  for  making  the  macro 
substitutions;  and  five  programs  in  165  files  which  are  used  to  aid  in  the 
validation  process.  The  differences  between  Version  1.9  and  1.10  are 
detailed  in  sections  2.0  through  4.0. 


2  TEST  MODIFICATIONS 

In  Version  1.10  of  the  ACVC,  384  tests  were  modified  from  the 
corresponding  tests  in  Version  1.9.  Modifications  have  been  made: 

a)  to  correct  tests  that  were  found  to  be  incorrect  in  previous 
versions  of  the  ACVC, 

b)  to  strengthen  the  tests  by  making  the  tests  more  comprehensive 
or  by  incorporating  more  cases  to  check,  and 

c)  to  bring  test  code  into  conformance  with  the  coding  standards. 


The  following  tests  have  been 

modified  from 

Version  1.9s 

, 

A28004A. ADA 

A35902C.ADA 

A74106C.ADA 

ADI  A0 1  A.  ADA 

\  9  ^ 

AE3101A.ADA 

B22003A. ADA 

B23003F.TST 

B24204A.ADA 

V/  \ 

B24204B. ADA 

B24204C.ADA 

B28001 J. ADA 

B28001R. ADA 

B28001S.ADA 
B2A003B. ADA 
B37201A.ADA 

B28001T. ADA 
B2A003C . ADA 
B37312B. ADA 

B28003A.ADA 
B33301 A.ADA 
B39004G.ADA 

B2A003A.ADA 

B36001A.ADA 

B3 9004 J. ADA 

NT:?  CR 

B39004L. ADA 

B44001 A. ADA 

B4 9006A. ADA 

B49009A.ADA 

L'liC  "/■> 

B59001 A.ADA 

B64001 A. ADA 

B67001 A.ADA 

B67001B. ADA 

*■' 

.  r 

B67001C.ADA 

B67001D. ADA 

B8501 3C.ADA 

B86001B. ADA 

. . -  .... 

B91001H.ADA 

B91003B.ADA 

B95001 A.ADA 

B97101 A.ADA 

B97101 E. ADA 

B97102C. ADA 

B97102E. ADA 

BC3105A. ADA 

BC3604A.ADA 

C32001B.ADA 

C  32 1 1 1  A. ADA 

C32112A.ADA 

-•  *  ,r 

C32112B.ADA 

C32113A.ADA 

C32115A.ADA 

C34004A.ADA 

1- - 

C 34007 A. ADA 

C34007D.ADA 

C34007G.ADA 

C34007M.ADA 

C34007P.ADA 

C34007S. ADA 

C34012A.ADA 

C35102A. ADA 

_ 

i  '  .'•* 

C35502F.TST 

C35502K. ADA 

C35502N.DEP 

C35502P. ADA 

J  r»  .  i 

C35503C. ADA 

C35503D.TST 

C35503E. ADA 

C35503F.TST 

'  ; 

C35503G.ADA 

C35503H. ADA 

C35503K.ADA 

C35503L. ADA 

l  ft-l !  A 

C355030. ADA 

C35503P. ADA 

C35505C. ADA 

C35507C. ADA 

C35507E. ADA 

C 355070. ADA 

C35507H. ADA 

C35507I.DEP 

M 

□ 


9. 


C35507J.DEP 
C35508E. ADA 
C35508O. ADA 
C35802Y.DEP 
C35A06N. ADA 
C37206A.ADA 
C37213J.ADA 
C37215H. ADA 
C4 1308C. ADA 
C42007G.ADA 
C45332A.ADA 
C45532N.DEP 
C45621I.DEP 
C45621M.DEP 
C45621Q.DEP 
C45621U.DEP 
C45621Y.DEP 
C47008A.ADA 
C52104L. ADA 
C64103F.ADA 
C64104J. ADA 
C64109I.ADA 
C8501 8B. ADA 
C94002G. ADA 
CC 1221  A. ADA 
CE2102A.ADA 
CE2102E. ADA 
CE2102I. ADA 
CE2103B.TST 
CE2104D. ADA 
CE2 106B. ADA 
CE2107D. ADA 
CE2107H. ADA 
CE2108C. ADA 
CE2 109C. ADA 
CE21 1 1  A. ADA 
CE2111E.ADA 
CE2115B.ADA 
CE2201F. ADA 
CE2204A.ADA 
CE2401C.ADA 
CE2402A.ADA 
CE2407A. ADA 
CE241 1  A. ADA 
CE3102B.TST 
CE3108A.ADA 
CE3111A.ADA 
CE31 11E.ADA 
CE31 1 4B. ADA 


C35507K.ADA 

C35508G.ADA 

C35508P. ADA 

C35802Z.DEP 

C36204B.ADA 

C37207A. ADA 

C37215C.ADA 

C38102C.ADA 

C4l 320A. ADA 

C45242B.ADA 

C45532B.DEP 

C45614C.DEP 

C45621J.DEP 

C45621N.DEP 

C45621R.DEP 

C45621V.DEP 

C45621Z.DEP 

C47009A.ADA 

C54A24B.ADA 

C64104A.ADA 

C64 104K. ADA 

C64109J.ADA 

C87B04B.ADA 

C96001A.ADA 

CC131 1  A. ADA 

CE2102B. ADA 

CE2102F. ADA 

CE2102J.ADA 

CE2 104A. ADA 

CE2105A.ADA 

CE2107A.ADA 

CE2107E.ADA 

CE2 1071. ADA 

CE2108D. ADA 

CE2110A.ADA 

CE2111B.ADA 

CE2111G.ADA 

CE2201 A. ADA 

CE2201G . ADA 

CE2208B. ADA 

CE2401E. ADA 

CE2404A.ADA 

CE2408A. ADA 

CE3002B.TST 

CE3103A. ADA 

CE3108B. ADA 

CE3111B.ADA 

CE3112A.ADA 

CE3115A.ADA 


C35507M.DEP 

C35508H.ADA 

C35703A.ADA 

C35904A.ADA 

C36204C.ADA 

C37209B. ADA 

C37215E.ADA 

C39005A.ADA 

C41402A.ADA 

C45252B.ADA 

C45532F.DEP 

C45621G.DEP 

C45621K.DEP 

C456210.DEP 

C45621S.DEP 

C45621W.DEP 

C46014A.ADA 

C47009B.ADA 

C64103B. ADA 

C64104H.ADA 

C641040.ADA 

C64109K.ADA 

C87B06A.ADA 

C97301B.ADA 

CC131 IB. ADA 

CE2102C.TST 

CE2102G.ADA 

CE2102K.ADA 

CE2104B. ADA 

CE2105B.ADA 

CE210TB.ADA 

CE2107F. ADA 

CE2108A. ADA 

CE2109A.ADA 

CE2110B.ADA 

CE2111C.ADA 

CE2111H.ADA 

CE2201B. ADA 

CE2201M. ADA 

CE2401 A.ADA 

CE2401F. ADA 

CE2405B. ADA 

CE2409A. ADA 

CE3002C.TST 

CE3104A.ADA 

CE3109A.ADA 

CE3111C.ADA 

CE31 12B. ADA 

CE3206A. ADA 


C35507N.DEP 

C35508J.DEP 

C35711B.ADA 

C35904B. ADA 

C37107A. ADA 

C37213H.ADA 

C37215G.ADA 

C41307D.ADA 

C42007F. ADA 

C45273A.ADA 

C45532J.DEP 

C45621H.DEP 

C45621L.DEP 

C45621P.DEP 

C45621T.DEP 

C45621X.DEP 

C47005A. ADA 

C4A012B. ADA 

C64103E. ADA 

C64104I.ADA 

C64109H. ADA 

C64109L.ADA 

C87B19A.ADA 

C99004A.ADA 

CC3603A.ADA 

CE2102D.ADA 

CE2102H.TST 

CE2103A.TST 

CE2104C.ADA 

CE2106A. ADA 

CE2 107C. ADA 

CE2107G. ADA 

CE2108B. ADA 

CE2109B. ADA 

CE21 10C. ADA 

CE21 1 1D. ADA 

CE21 1 5A. ADA 

CE2201C. ADA 

CE2202A. ADA 

CE2401B.ADA 

CE2401H. ADA 

CE2406A.ADA 

CE2410A. ADA 

CE3102A.ADA 

CE3107A.TST 

CE3110A.ADA 

CE3111D.ADA 

CE3114A.ADA 

CE3208A. ADA 


CE3301 A. ADA  CE3302A. ADA  CE3303A. ADA  CE3305A. ADA 

CE3402A.ADA  CE3402C.ADA  CE3402D. ADA  CE3402E. ADA 

CE3403A.ADA  CE3403B. ADA  CE3403C . ADA  CE3403D. ADA 

CE3403E.ADA  CE3403F.ADA  CE3404A. ADA  CE3404B. ADA 

CE3404C. ADA  CE3405A. ADA  CE3405C. ADA  CE3405D. ADA 

CE3406A.ADA  CE3406B. ADA  CE3406C . ADA  CE3406D.ADA 

CE3407A.ADA  CE3407B.ADA  CE3407C.ADA  CE3408A. ADA 

CE3408B.ADA  CE3408C. ADA  CE3409A. ADA  CE3409B. ADA 

CE3409C.ADA  CE3409D. ADA  CE3409E. ADA  CE3410A.ADA 

CE3410B.ADA  CE3410C. ADA  CE3410D. ADA  CE3410E. ADA 

CE3411A.ADA  CE3411C.ADA  CE3412A.ADA  CE341 3A. ADA 

CE3413C.ADA  CE3601A.ADA  CE3602A. ADA  CE3602B.ADA 

CE3602C.ADA  CE3602D.ADA  CE3603A. ADA  CE3604A. ADA 

CE3605A.ADA  CE3605B.ADA  CE3605C.ADA  CE3605D.ADA 

CE3605E.ADA  CE3606A.ADA  CE3606B. ADA  CE3701A. ADA 

CE3704A. ADA  CE3704B. ADA  CE3704C.ADA  CE3704D. ADA 

CE3704E.ADA  CE3704F. ADA  CE3704M. ADA  CE3704N. ADA 

CE37040.ADA  CE3706C.ADA  CE3706D. ADA  CE3706F. ADA 

CE3706G . ADA  CE3707A. ADA  CE3708A. ADA  CE3801A.ADA 

CE3804A.ADA  CE3804B. ADA  CE3804C.ADA  CE3804D.ADA 

CE3804E.ADA  CE3804F. ADA  CE3804G.ADA  CE3804I.ADA 

CE3804K.ADA  CE3804M.ADA  CE3805A. ADA  CE3805B. ADA 

CE3806A.ADA  CE3806C.ADA  CE3806D. ADA  CE3806E.ADA 

CE3809A.ADA  CE3809B. ADA  CE3810A.ADA  CE3901 A. ADA 

CE3905A. ADA  CE3905B. ADA  CE3905C. ADA  CE3905L. ADA 

CE3906A. ADA  CE3906B. ADA  CE3906C.ADA  CE3906D. ADA 

CE3906E.ADA  CE3906F. ADA  CE3908A. ADA  E28005C.ADA 

In  addition,  the  following  support  files  and  tests  for  support 
were  modified  for  Version  1.10: 

MACHO. DFS  REP SPEC. ADA  REPBODY . ADA  CZ1 1 01  A. ADA 

CZ1 1 02. ADA 


files 


3  TEST  DELETIONS 


The  following  26  tests  appear  in  ACVC  Version  1.9,  but  not  in  ACVC 
Version  1.10.  Several  of  the  deleted  tests  were  renamed  to  new  test  names 
in  ACVC  1.10  to  conform  to  the  naming  conventions  provided  by  the 
Implementer's  Guide  or  to  reflect  a  change  in  test  class. 


A37312A.ADA 
B34001S.ADA 
BC10AGA. ADA 
C910BDA. ADA 
CE3203A.ADA 
CE3405B.ADA 
E24101 A.TST 


A41307A.ADA 
B86001C.DEP 
C35A03E. ADA 
C910BDB. ADA 
CE3301B. ADA 
CE3409F.ADA 
E66001D. ADA 


A41307C.ADA 
B86001D.TST 
C35A03R. ADA 
C950CHC. ADA 
CE3301C.ADA 
CE3410F.ADA 


B33006B. ADA 
B97102A.ADA 
C900ACA. ADA 
CE2210A.ADA 
CE3402B.ADA 
CE3412C.ADA 


4  NEW  TESTS 

The  following  623  tests  have  been  added  to  Version  1.10  of  the  ACVC  Test 
Suite.  A  test  is  considered  "new"  if  the  test  name  did  not  exist  in  ACVC 
Version  1.9.  Several  of  the  new  tests  were  renamed  from  former  tests  in 
ACVC  Version  1.9  to  conform  to  the  naming  conventions  provided  by  the 
Implementer's  Guide  or  to  reflect  a  change  in  test  class. 


A98001A.ADA 
AD1C04D.DEP 
AD3015F.DEP 
AD7005A. ADA 
AD7102A. ADA 
B22003B. ADA 
B2A003D. ADA 
B33301B. ADA 
B34005K.ADA 
B34006B.ADA 
B34014B.ADA 
B34014K.ADA 
B34014S.ADA 
B37201B. ADA 
B64001B.ADA 
B67001I.ADA 
B86001C. ADA 
B86001G . ADA 
B86001K.ADA 
B860010. ADA 
B86001S.ADA 
B86001W.DEP 
B91003E.ADA 
B97101G.ADA 
BD5001 A. ADA 


AD1009M.DEP 
AD3014C.DEP 
AD3015H.DEP 
AD7006A. ADA 
AD7103A.ADA 
B24204D.ADA 
B2A003E. ADA 
B34005B.ADA 
B34005N.ADA 
B34006E.ADA 
B34014D.ADA 
B34014M.ADA 
B34014V.ADA 
B37212B.ADA 
B641 10A. ADA 
B67001J.ADA 
B86001D. ADA 
B86001H. ADA 
B86001L. ADA 
B86001 P. ADA 
B86001T.DEP 
B86001X.TST 
B95001C. ADA 
B97101H. ADA 
BD5002A. ADA 


ADI  009V. DEP 
AD3014F.DEP 
AD3015K.DEP 
AD7101 A.ADA 
AD7103C.ADA 
B24204E. ADA 
B2A003F.ADA 
B34005E. ADA 
B34005Q.ADA 
B34006H.ADA 
B34014F.ADA 
B340140.ADA 
B34014X.ADA 
B41307B.ADA 
B66001D. ADA 
B67001K.ADA 
B86001E. ADA 
B86001I. ADA 
B86001M. ADA 
B86001Q.ADA 
B86001U.DEP 
B86001Y.TST 
B95069D. ADA 
BC3102C.ADA 
BD5002B. ADA 


AD1009W.DEP 
AD301 5C.DEP 
AD7001B.ADA 
AD7101C.ADA 
AD7104A.ADA 
B24204F. ADA 
B33002A. ADA 
B34005H. ADA 
B34005T.ADA 
B34006K.ADA 
B34014I.ADA 
B34014Q.ADA 
B3401UZ.ADA 
B44001B. ADA 
B67001H. ADA 
B85013D.ADA 
B86001F.ADA 
B86001 J.ADA 
B86001N. ADA 
B86001R. ADA 
B86001 V.DEP 
B86001Z.TST 
B95069E.ADA 
BC3123C.ADA 
BD5002C. ADA 
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BD5002D. ADA  BD5002E. ADA 

BD5006B. ADA  BD5006C. ADA 

BD5008A. ADA  BD5101 A. ADA 

BD5103A.ADA  BD5104A.ADA 

C321 15B.ADA  C34004C.ADA 

C34005D. ADA  C34005F.ADA 

C34005J.ADA  C34005L. ADA 

C34006A.ADA  C34006D.ADA 

C34009A.ADA  C34014A.ADA 

C34014G.ADA  C34014H.ADA 

C34014N.ADA  C34014P.ADA 

C34014U.ADA  C34014W.ADA 

C35505F.ADA  C35A060.ADA 

C35A06R. ADA  C35A06S. ADA 

C37312A.ADA  C41307A.ADA 

C91004B.ADA  C91004C.ADA 

C98001C.ADA  CC 122  IB. ADA 

CC1223A. ADA  CC3123A. ADA 

CC3125C.ADA  CC3125D. ADA 

CC 3220 A. ADA  CC3221 A.ADA 

CC3606A. ADA  CD1009A.DEP 

CD1009D.DEP  CD1009E.DEP 

CD1009H.DEP  CD1009I.DEP 

CD1009L.DEP  CD1009N.DEP 

CD1009Q.DEP  CD1009R.DEP 

CD10090.DEP  CD1009X.DEP 

CD1C03A.DEP  CD1C03B. ADA 

CD1C03F.DEP  CD1C03G.DEP 

CD1C04A.DEP  CD1C04B.DEP 

CD1C06A.DEP  CD1D01 A.ADA 

CD1D01D. ADA  CD1D02A. ADA 

CD2A21B.DEP  CD2A21C.DEP 

CD2A22A.DEP  CD2A22B.DEP 

CD2A22E.DEP  CD2A22F.DEP 

CD2A22I.DEP  CD2A22J.DEP 

CD2A23C.DEP  CD2 A23D.DEP 

CD2A24B.DEP  CD2A24C.DEP 

CD2A24F.DEP  CD2A24G.DEP 

CD2A24J.DEP  CD2A31 A.DEP 

CD2A31D.DEP  CD2A32 A.DEP 

CD2A32D.DEP  CD2A32E.DEP 

CD2A32H.DEP  CD2A32I.DEP 

CD2A41B.DEP  CD2A41C.DEP 

CD2A42A.DEP  CD2A42B.DEP 

CD2A42E.DEP  CD2A42F.DEP 

CD2A42I.DEP  CD2A42J.DEP 

CD2A51C.DEP  CD2A51D.DEP 

CD2A52B.DEP  CD2A52C.DEP 

CD2A52H.DEP  CD2A52I.DEP 

CD2A53B.DEP  CD2A53C.DEP 

CD2A54A.DEP  CD2A54B.DEP 

CD2A54G.DEP  CD2A54H.DEP 


BD5002F. ADA  BD5005B. ADA 

BD5006D. ADA  BD5006J. ADA 

BD5101B.ADA  BD51 02A. ADA 

BE3301C. ADA  C32111B.ADA 

C34005A.ADA  C34005C.ADA 

C34005G.ADA  C34005I.ADA 

C34005M. ADA  C340050.ADA 

C34006F.ADA  C34007J.ADA 

C34014C.ADA  C34014E.ADA 

C34014J.ADA  C34014L.ADA 

C34014R.ADA  C34014T.ADA 

C34014Y.ADA  C35505E.ADA 

C35A06P. ADA  C35A06Q . ADA 

C3721 3K. ADA  C37213L.ADA 

C41307C.ADA  C41309A.ADA 

C95040B.ADA  C98001B.ADA 

CC1221C .ADA  CC1221D. ADA 

CC3123B. ADA  CC3125B.ADA 

CC3126A.ADA  CC3127A.ADA 

CC3222A.ADA  CC 3223 A. ADA 

CD1009B.DEP  CD1009C.DEP 

CD1009F.DEP  CD1009G.DEP 

CD1009J.DEP  CD1009K.DEP 

CD10090.DEP  CD1009P.DEP 

CD1009S.DEP  CD1009T.DEP 

CD1009Y.DEP  CD1009Z.DEP 

CD1C03C.TST  CD1C03E.DEP 

CD1C03H.DEP  CD1C03I.ADA 

CD1C04C.DEP  CD1C04E.DEP 

CD1D01B.ADA  CD1D01C.ADA 

CD1D03A. ADA  CD2A21 A.DEP 

CD2A21D.DEP  CD2A21 E.DEP 

CD2A22C.DEP  CD2A22D.DEP 

CD2A22G.DEP  CD2A22H.DEP 

CD2A23A.DEP  CD2A23B.DEP 

CD2A23E.DEP  CD2A24A.DEP 

CD2A24D.DEP  CD2A24E.DEP 

CD2A24H.DEP  CD2A24I.DEP 

CD2A31B.DEP  CD2A31C.DEP 

CD2A32B.DEP  CD2A32C.DEP 

CD2A32F.DSP  CD2A32G.DEP 

CD2A32J.DEP  CD2A41 A.DEP 

CD2A41D.DEP  CD2A41 E.DEP 

CD2A42C.DEP  CD2A42D.DEP 

CD2A42G.DEP  CD2A42H.DEP 

CD2A51 A.DEP  CD2A51B.DEP 

CD2A51 E.DEP  CD2A52A.DEP 

CD2A52D.DEP  CD2A52G.DEP 

CD2A52J.DEP  CD2A53A.DEP 

CD2A53D.DEP  CD2A53E.DEP 

CD2A54C.DEP  CD2A54D.DEP 

CD2A54I.DEP  CD2A54 J.DEP 


CD2A61 A.DEP 

CD2A61E.DEP 

CD2A61 I.DEP 

CD2A62 A.DEP 

CD2A63A.DEP 

CD2A64 A.DEP 

CD2A65A.DEP 

CD2A66 A.DEP 

CD2A71 A.DEP 

CD2A72 A.DEP 

CD2A73A.DEP 

CD2A74 A.DEP 

CD2A75A.DEP 

CD2A76A.DEP 

CD2A81 A.TST 

CD2A81E.TST 

CD2A83B.TST 

CD2A83G.TST 

CD2A84E.DEP 

CD2A84 I.DEP 

CD2A84N.DEP 

CD2A91C.TST 

CD2B1 1B.DEP 

CD2B1 1F.DEP 

CD2B1 6A.DEP 

CD2C11D.DEP 

CD2D1 3A.DEP 

CD3014E.DEP 

CD3015E.DEP 

CD3015L.DEP 

CD4051 A.DEP 

CD5003B.DEP 

CD5003F.DEP 

CD5007B.DEP 

CD501 1D.DEP 

CD501 1H.DEP 

CD501 1M.DEP 

CD501 1R.DEP 

CD5012C.DEP 

CD5012Q.DEP 

CD5012L.DEP 

CD5013C.DEP 

CD5013G.DEP 

CD5013L.DEP 

CD5013R.DEP 

CD5014C.DEP 

CD5014G.DEP 

CD5014K.DEP 

CD50140.DEP 

CD50140.DEP 

CD5014Y.DEP 

CD7004C.TST 


CD2A61B.DEP 

CD2A61 F.DEP 

CD2A61 J.DEP 

CD2A62B.DEP 

CD2A63B.DEP 

CD2A64B.DEP 

CD2A65B.DEP 

CD2A66B.DEP 

CD2A71B.DEP 

CD2A72B.DEP 

CD2A73B.DEP 

CD2A74B.DEP 

CD2A75B.DEP 

CD2A76B.DEP 

CD2A81B.TST 

CD2A81F.TST 

CD2A83C.TST 

CD2A84B.DEP 

CD2A84F.DEP 

CD2A84K.DEP 

CD2A87A.TST 

CD2A91D.TST 

CD2B11C.DEP 

CD2B1 1G.DEP 

CD2C 11 A.DEP 

CD2C11E.DEP 

CD3014A.DEP 

CD3015A.DEP 

CD3015G.DEP 

CD3021 A.DEP 

CD4051B.DEP 

CD5003C.DEP 

CD5003G.DEP 

CD50 11  A.DEP 

CD501 1E.DEP 

CD501 1 I.DEP 

CD501 1N.DEP 

CD501 1S.DEP 

CD5012D.DEP 

CD5012H.DEP 

CD5012M.DEP 

CD5013D.DEP 

CD501 3H.DEP 

CD50134.DEP 

CD501 3S.DEP 

CD5014D.DEP 

CD501 4H.DEP 

CD5014L.DEP 

CD5014R.DEP 

CD5014V.DEP 

CD501 4Z.DEP 

CD7004D.TST 


CD2A61C.DEP 

CD2A61G.DEP 

CD2A61K.DEP 

CD2A62C.DEP 

CD2A63C.DEP 

CD2A64C.DEP 

CD2A65C.DEP 

CD2A66C.DEP 

CD2A71C.DEP 

CD2A72C.DEP 

CD2A73C.DEP 

CD2A74C.DEP 

CD2A75C.DEP 

CD2A76C.DEP 

CD2A81C.TST 

CD2A81G.TST 

CD2A83E.TST 

CD2A84C.DEP 

CD2A84G.DEP 

CD2A84L.DEP 

CD2A91 A.TST 

CD2A91E.TST 

CD2B1 1D.DEP 

CD2B15B.DEP 

CD2C 1 1B.DEP 

CD2D11 A.DEP 

CD3014B.DEP 

CD3015B.DEP 

CD3015I.DEP 

CD4031 A.DEP 

CD4051C.DEP 

CD5003D.DEP 

CD5003H.DEP 

CD5011B.DEP 

CD501 1 F.DEP 

CD5011K.DEP 

CD501 10.DEP 

CD5012A.DEP 

CD501 2E.DEP 

CD5012I.DEP 

CD501 3A.DEP 

CD501 3E.DEP 

CD501 3I.DEP 

CD501 3N.DEP 

CD501 4A.DEP 

CD5014E.DEP 

CD501 4I.DEP 

CD5014M.DEP 

CD501 4S.DEP 

CD5014W.DEP 

CD7003A.TST 

CD7005B.TST 


CD2A61D.DEP 

CD2A61H.DEP 

CD2A61 L.DEP 

CD2A62D.DEP 

CD2A63D.DEP 

CD2A64D.DEP 

CD2A65D.DEP 

CD2A66D.DEP 

CD2A71D.DEP 

CD2A72D.DEP 

CD2A73D.DEP 

CD2A74D.DEP 

CD2A75D.DEP 

CD2A76D.DEP 

CD2A81D.TST 

CD2A83A.TST 

CD2A83F.TST 

CD2A84D.DEP 

CD2A84H.DEP 

CD2A84M.DEP 

CD2A91B.TST 

CD2A95A.TST 

CD2B1 1E.DEP 

CD2B15C.DEP 

CD2C1 1C.DEP 

CD2D1 1B.DEP 

CD3014D.DEP 

CD3015D.DEP 

CD3015J.DEP 

CD4041 A.DEP 

CD4051D.DEP 

CD5003E.DEP 

CD5003I.DEP 

CD501 1C.DEP 

CD501 1G.DEP 

CD5011L.DEP 

CD501 1Q.DEP 

CD5012B.DEP 

CD501 2F.DEP 

CD5012 J.DEP 

CD501 3B.DEP 

CD5013F.DEP 

CD5013K.DEP 

CD50130.DEP 

CD501 4B.DEP 

CD5014F.DEP 

CD501 4J.DEP 

CD5014N.DEP 

CD501 4T.DEP 

CD5014X.DEP 

CD7004A.TST 

CD7005E.TST 


CD7006B.TST 

CD7101B.TST 

CD7101G.TST 

CD7104B.TST 

CD7204C.DEP 

CE21031.ADA 


CD7006E.TST 
CD7101D.ADA 
CD7102B.TST 
CD7105A. ADA 
CD7205C.DEP 
CE2102N. ADA 


CD7007B. ADA 
CD7101E.DEP 
CD7103B.TST 
CD7203B.ADA 
CD7205D.DEP 
CE2 1020. ADA 


CD7007C.TST 
CD7101F.DEP 
CD7103D.TST 
CD7204B. ADA 
CE2102L. ADA 
CE2102P. ADA 


CE2102Q.ADA  CE2102R. ADA  CE2102S. ADA  CE2102T. ADA 
CE2102U.ADA  CE2102V.ADA  CE2102W. ADA  CE2102X.ADA 
CE2102Y.ADA  CE2103C .ADA  CE2103D. ADA  CE2107L. ADA 
CE2108E. ADA  CE2108F. ADA  CE2108G. ADA  CE2108H. ADA 
CE2110D.ADA  CE21 1 1F. ADA  CE2111I.ADA  CE2201H. ADA 
CE2201 I. ADA  CE2201 J.ADA  CE2201K.ADA  CE2201L. ADA 
CE2201M. ADA  CE2201N. ADA  CE2204C.ADA  CE2204D. ADA 
CE2205A.ADA  CE2401I.ADA  CE2401 J.ADA  CE2401K. ADA 
CE2401L. ADA  CE2404B. ADA  CE2407B. ADA  CE2408B. ADA 
CE2409B. ADA  CE2410B. ADA  CE3102D.ADA  CE31 02E.ADA 
CE3102F. ADA  CE3102G .ADA  CE3102H. ADA  CE3102I.ADA 
CE31 02 J.ADA  CE3102K.ADA  CE3104B.ADA  CE3104C.ADA 
CE3107B. ADA  CE3112C.ADA  CE3112D.ADA  CE3404D. ADA 
CE3411B.ADA  CE3604B.ADA  CE3801B.ADA  CE3804H. ADA 
CE3804 J.ADA  CE3804L.ADA  CE3804H. ADA  CE38040.ADA 
CE3804P.ADA  CE3806B.ADA  CE3806F.ADA  CE3806G.ADA 
CE3806H.ADA  CE3810B.ADA  E24201A.TST  ED1D04A.DEP 
ED2A26A.DEP  ED2A56A.DEP  ED2A86A.TST  ED7004B.TST 
ED7005C.TST  ED7005D.TST  ED7006C.TST  ED7006D.TST 
EE3203A.ADA  EE3301B.ADA  EE3402B.ADA  EE3405B. ADA 
EE3409F.ADA  EE3410F. ADA  EE3412C . ADA 


In  addition,  one  new  support  unit  (in  one  file),  a  system  of  programs 
(in  165  files)  designed  to  aid  in  the  validation  process,  and  a  macro 
substitution  program  have  been  added  to  ACVC  Version  1.10: 

SPPRT13.ADA  (The  specification  of  a  package  whose  body  must  be 
provided  by  the  user . ) 

AVAT  (One  package  in  files  DATSPEC. ADA  and  DATBODY . ADA ; 

all  other  units  in  files  whose  names  have  the  form 
"AVATfM.ext"  where  each  %  is  replaced  by  a  letter 
or  digit  and  "ext"  is  either  "ADA"  or  "TST".) 

MACROSUB  A  program  which  modifies  the  "TST"  tests  inserting  the 

values  supplied  in  the  file  MACRO. DFS.  MACRO. DFS 
must  be  modified  to  reflect  the  implementation  dependent 
values  of  the  compiler. 


ACVC  1.10  Tape  Information 


1  INTRODUCTION 

The  ACVC  1.10  test  files  are  written  on  one  tape  volume  in  VAX  VMS  BACKUP 
format.  One  of  the  files  on  this  tape  is  ACVC10.LST,  which  contains  the  names 
of  all  tests  in  the  ACVC  test  suite. 


2  TAPE  FORMAT 

This  tape  was  written  using  the  BACKUP  utility  on  a  VAX-11/780.  The  VAX 
command  to  read  this  tape  is 

$  BACKUP/LOG  MF : ACVC10 . BCK/SAVESET  [directory  where  you  want  the  tests]*.*.* 
Note:  MF:  is  the  logical  name  for  the  tape  drive. 


3  TEST  MODIFICATIONS 

The  Ada  tests  will  be  periodically  updated  and  corrected.  Their 
correctness  is  not  guaranteed  either  by  the  ACVC  Maintenance  Organization 
(AMO)  or  by  its  contractor.  Please  report  errors  in  writing  to 

Mr.  Steven  P.  Wilson 

ACVC  Maintenance  Organization 

ASD/SCOl 

Wright-Pat terson  AFB,  OH  45433-6503 


You  will  receive  notification  of  changes  to  this  version  on  a  periodic 
basis.  Please  notify  the  AMO  of  any  change  of  address. 
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1  Scope. 

1.1  Identification. 

This  is  the  Ada  Compiler  Validation  Capability  (ACVC)  User's  Guide. 
This  document  details  the  use  of  Version  1.10  of  the  ACVC. 


1.2  Purpose. 

This  user's  guide  describes  the  ACVC  test  suite,  its  use,  and 
interpretation  of  the  test  results.  It  should  be  read  by  anyone  who  wishes 
to  use  the  ACVC  to  test  an  implementation  of  the  Ada  language. 


1.3  Introduction. 

The  primary  purpose  of  the  ACVC  is  to  help  decide  whether  an  Ada 

translator/compiler  conforms  to  ANSI/HIL-STD-1815A,  the  Reference  Hanual 
for  the  Ada  Programming  Language  (RM).  The  RM  is  also  known  as  the  Ada 
Standard.  The  ACVC  is  maintained  by  the  ACVC  Maintenance  Organization 
(AMO)  under  the  direction  of  the  Ada  Validation  Office  (AVO)  of  the  Air 
Force's  Ada  Joint  Program  Office  (AJPO).  The  three  main  components  of  the 
ACVC  are: 

.  An  implementers'  guide  that  describes  the  implementation 

implications  of  the  RM  and  the  conditions  that  are  checked  by  each 
validation  test  program. 

.  A  suite  of  validation  test  programs  that  are  submitted  to  a 

compiler. 

.  Validation  support  tools  that  assist  in  determining  system 

capabilities,  preparing  tests  for  compilation,  and  analyzing  the 
results  of  execution. 


2  References. 


1.  ANSI/MIL-STD-1815A  (The  Reference  Manual  for  the  Ada  Programming 
Language),  22  January  1983. 

2.  Ada  Compiler  Validation  Procedures  and  Guidelines,  Ada  Joint 
Program  Office,  1  January  1987. 

3.  Ada  Compiler  Validation  Capability  Implementers'  Guide,  SofTech, 
Inc . ,  1  December  1986. 

4.  ACVC  Version  1.10  Version  Description  Document,  SofTech,  Inc., 

1  December  1987. 
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ACVC  Test  Design  and  Coding  Standards,  SofTech,  Inc., 
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December  1986. 


3  Instruction  For  Use. 

3.1  Ada  Compiler  Validation  Capability  Implementers'  Guide. 

All  of  the  ACVC  test  programs  are  based  on  objectives  given  in  the  Ada 
Compiler  Validation  Capability  Implementers'  Guide  (AIG).  The  AIG 
basically  follovs  the  RH.  However,  the  AIG  contains  additional  sections 
which  further  clarify  the  rules  of  the  language,  details  the  interpretation 
of  any  ambiguities  in  the  RM,  and  presents  objectives  and  guidelines  for 
the  tests. 

3.2  Validation  Test  Programs. 

The  ACVC  test  suite  is  composed  of  various  test  programs  designed  to 
ensure  that  a  compiler  correctly  conforms  to  all  aspects  of  the  RM.  The 
test  suite  also  attempts  to  ensure  that  the  implementation  does  not  add  any 
illegal  ex tent ions  to  the  language. 

The  goals  of  the  ACVC  include: 

.  Maximizing  the  amount  of  information  derived  from  a  validation 
attempt;  in  particular,  identifying  as  many  nonconformances  as 
possible. 

.  Minimizing  the  effort  needed  to  test  a  compiler;  in  particular, 
the  effort  needed  to  a)  adapt  the  tests  to  a  particular  compiler 
environment,  and  b)  determine  which  tests  passed  and  which 
failed. 

.  Minimizing  the  effort  needed  to  determine  if  a  test  is  correct 
(that  is,  if  it  uses  an  appropriate  algorithm  to  check  the 
objective)  when  failed  on  a  compiler. 

A  thorough  coverage  of  the  language  and  the  possible 
implementations  of  its  features. 

Making  the  tests  understandable  and  maintainable. 
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3.2.1  Test  Naming  Conventions. 

Test  names  have  the  form  <name> . <type> .  The  <name>  component  is 
composed  of  seven  to  nine  characters.  The  interpretation  of  each  character 
is  described  below,  where  the  first  column  indicates  the  character 
position(s)  and  the  second  column  gives  the  corresponding  meaning: 

1  Test  classification  (letter)  -  identifies  the  class  of  the 
test  (see  Classifications). 

2  AIG  chapter  (hexadecimal)  -  identifies  the  chapter  which 
contains  the  objective  being  tested. 

3  Section  (hexadecimal)  -  identifies  the  section  within  the 
above  chapter. 

4  Sub-section  (alpha-numeric)  -  identifies  the  sub-section 
within  the  above  section. 

5,  6  Test  objective  (decimal)  -  identifies  the  objective,  within 
the  above  sub-section,  being  tested. 

7  Sub-objective  (letter)  -  indicates  a  sub-objective  of  the 
above  objective. 

8  Compilation  sequence  (alpha-numeric)  -  indicates  the 
compilation  order  of  multiple  files  that  comprise  a  single 
test  (0  is  compiled  first).  This  position  is  present  only  if 
the  test  is  composed  of  multiple  files. 

9  Main  subprogram  indication  (character  'M')  -  indicates  which 
file  of  a  test  set  contains  the  main  procedure.  This  position 
is  present  only  for  one  file  of  a  multi-file  test. 


The  <type>  component  is  a  three-character  extension  which  identifies 
the  type  of  the  test  (see  Type  Extensions). 

Characters  2-7  of  the  <name>  component  uniquely  identify  every  test 
objective.  Each  individual  objective  has  only  a  single  classification  and 
type  designation  associated  with  it.  The  classification  and  type  of  a  test 
indicates  its  expected  compilation/execution  results. 


3. 2. 1.1  Classifications. 

The  test  classifications  are  A,  B,  C,  D,  E,  and  L.  Tests  that  come 
under  classes  A,  C,  D,  and  E  are  also  considered  executable  tests. 


3. 2. 1.1.1  Class  A. 

Class  A  tests  ensure  acceptance  (compilation)  of  certain  language 
constructs  which  cannot  be  verified  at  run  time.  There  are  no  testing 
conditions  within  them.  These  tests  are  expected  to  execute  successfully  - 
they  simply  report  'PASSED'.  An  implementation  is  considered  to  have 
failed  any  test  for  which  it  does  not  indicate  otherwise. 
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3. 2. 1.1. 2  Class  B. 

Class  B  tests  check  that  illegal  constructs  are  caught  and  that  there 
are  no  illegal  extentions  to  the  language.  These  tests  are  expected  to 
fail  compilation.  They  are  graded  as  'PASSED'  if  all  of  the  indicated 
errors  in  the  test  are  caught  and  no  legal  constructs  are  rejected.  An 
implementation  is  considered  to  have  failed  any  test  for  vhich  an  error  is 
not  caught  or  a  legal  construct  is  rejected. 

Lines  containing  errors  vhich  must  be  caught  are  marked  ' —  ERROR:'. 
This  error  comment  may  also  include  a  very  brief  indication  of  what  makes 
the  construct  illegal.  Lines  containing  legal  constructs  vhich  must  be 
accepted  are  marked  ' —  OK.'. 

The  folloving  rules  apply  in  satisfying  the  pass  criteria: 

.  The  compiler  rejects  a  test  vhich  contains  only  a  single  error. 

.  The  compiler  displays  an  error  message  for  all  of  the  ' —  ERROR:' 
indications  in  a  test  vith  multiple  errors. 

.  All  lines  marked  ' —  OK.'  are  accepted. 

.  Split  tests  can  be  created  (see  Modifying  Tests). 


3. 2. 1.1. 3  Class  C. 

Class  C  tests  check  the  run-time  system  and  ensure  that  verifiable 
constructs  are  implemented  correctly.  These  tests  are  expected  to  execute. 
The  tests  vill  indicate  either  'PASSED',  'FAILED',  or  'NOTAPPLI CABLE' 
based  on  the  conditions  tested.  An  implementation  is  considered  to  have 
failed  any  test  for  vhich  it  does  not  indicate  othervise. 


3. 2. 1.1.4  Class  D. 

Class  D  tests  are  capacity  tests.  These  tests  are  expected  to  execute 
successfully  if  no  errors  are  reported  during  compilation.  If  an  error  is 
reported  during  compilation,  it  must  be  an  error  associated  vith  the 
capacity  being  tested,  in  vhich  case  the  test  is  considered  inapplicable. 
Othervise,  an  implementation  may  be  considered  to  have  failed  any  test  for 
vhich  it  does  not  indicate  differently;  such  failure  should  be  reported  to 
the  AVO  for  a  ruling. 


3. 2. 1.1. 5  Class  E. 

Class  E  tests  check  implementation-dependent  options  and  the 
resolution  of  ambiguities  in  the  RM.  These  tests  are  expected  to  execute 
successfully.  Tests  vhich  execute  print  comments  to  indicate  how  the 
options  or  ambiguities  are  handled.  The  source  code  for  each  test  lists 
specific  pass/fail  criteria.  For  some  tests,  these  criteria  are  indicated 
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at  execution  time.  These  criteria  are  compared  to  the  comments  to  make  a 
grading  determination.  An  implementation  is  considered  to  have  failed  any 
test  for  vhich  it  does  not  indicate  othervise. 


3.2. 1.1.6  Class  L. 

Class  L  tests  ensure  that  all  library  unit  dependencies  within  a 
program  are  satisfied  before  said  program  can  be  linked  and  executed,  and 
that  circularity  among  units  is  not  allowed.  These  tests  are  expected  to 
fail  at  link  time;  however,  failure  to  compile  may  be  acceptable  for  some 
implementations.  These  tests  are  graded  as  'PASSED'  if  they  do  not 
successfully  complete  the  link  phase.  Any  test  vhich  begins  execution  is 
graded  as  'FAILED'. 

For  tests  vhich  might  possibly  fail  at  compile  time,  the  lines 
containing  the  illegal  constructs  are  marked  ' —  ERROR:'. 


3. 2. 1.2  Type  Extensions. 

The  type  extensions  and  their  meanings  are: 

ADA  -  These  tests  check  the  standard  features  of  the  language  that 
must  be  implemented  by  all  compilers.  They  are  expected  to  be 
compiled/executed  unmodified  and  must  be  successfully  processed 
by  all  implementations. 

DEP  -  These  tests  involve  optional,  implementation-dependent  features 
of  the  language.  Each  test  concerned  with  supported  features 
must  be  successfully  processed  as  indicated  by  its 

classification.  Tests  concerned  with  unsupported  features  are 
considered  inapplicable,  provided  they  are  processed  as 

described  below: 

.  Class  B  tests  should  be  successfully  compiled. 

.  Executable  tests  must  be  rejected  at  compile  time  as 
described  in  the  test's  applicability  criteria. 

TST  -  These  tests  also  check  implementation-dependent  features  of  the 
language.  They  contain  macros  for  the  substitution  of  certain 
implementation-dependent  values  (see  Macro  Substitutions). 
Generally,  each  of  these  tests  is  expected  to  be  successfully 
processed  as  indicated  by  its  classification.  Rovever,  some  of 
the  tests  may  be  concerned  with  unsupported  features  and 
therefore  are  treated  as  described  for  DEP  tests. 


3.2.2  Coding  Standards. 

To  help  meet  the  goals  of  the  ACVC,  certain  coding  standards  are 
followed. 
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3.2.2. 1  General. 

Some  general  test  writing  standards  include: 

.  Tests  are  written  using  the  basic  55-character  character-set  (26 
capital  letters,  10  digits,  and  19  punctuation  marks). 

.  Maximum  line  length  is  72  characters,  except  as  noted  in  certain 
DEP  and  TST  tests. 

.  Numeric  values  are  generally  in  the  range  (-128.. 127).  However, 
if  necessary,  they  can  be  within  the  range  (-2048. .2047) ,  a 
maximum  of  12  bits. 

Tests  are  written  using  as  few  Ada  features  as  are  necessary  to 
write  a  self-checking  executable  test  that  is  not  too  difficult  to 
read  or  modify. 

To  help  ensure  a  thorough  coverage  of  the  language,  and  to  promote 
understandability  and  maintainability,  many  objectives  are  divided  into 
sub-objectives,  with  some  checked  in  a  single  test  file  and  others  checked 
in  separate  test  files.  For  example,  if  a  test  objective  is  concerned  with 
some  property  of  scalar  types,  then  individual  subtests  check: 

.  INTEGER,  CHARACTER,  BOOLEAN,  and  a  user-defined  enumeration  type, 
all  in  one  test  file  since  we  expect  all  of  these  types  to  be 
implemented. 

.  FLOAT  and  a  user-defined  floating-point  type  in  a  separate  test 
file. 

.  A  fixed-point  type  in  another  separate  test  file. 

Sub-objectives  which  are  difficult  to  test  are  also  tested  in  separate 
tests  files. 


3. 2. 2. 2  Header  Format. 

The  following  header  is  placed  at  the  beginning  of  all  new  and 
modified  tests: 

—  filename. 

—  OBJECTIVE: 


—  SEPARATE  FILES: 


—  APPLICABILITY  CRITERIA: 
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—  PASS/FAIL  CRITERIA: 


—  MACRO  SUBSTITUTIONS: 


HISTORY: 

ccc  mm/dd/yy  comment  about  change. 


The  purpose  of  each  section  is: 


filename 

objective 


separate  files 


applicability  criteria  - 


pass/fail  criteria 


macro  substitution 


history 


identical  to  the  actual  name  of  the  file, 
describes  the  test's  objective  and  explains 
the  exact  conditions  or  sub-objectives 
presently  being  tested. 

identifies  all  of  the  component  files  of  a 
multiple  file  test,  with  a  brief  description 
of  each  file. 

details  under  what  conditions  the  test  can  be 
ruled  inapplicable. 

explains  how  to  interpret  the  run-time 
results  for  grading  the  test, 
identifies  the  macros  in  the  test  which  must 
be  substituted  and  a  brief  description  of 
what  the  replacement  value  represents, 
details  who  has  made  changes  to  the  test, 
when,  and  vhat  those  changes  were. 


The  file  name,  objective  and  history  sections  are  always  present.  The 
separate  files,  applicability  criteria,  pass/fail  criteria  and  macro 
substitutions  sections  are  present  only  for  tests  which  have  such 
conditions. 


3. 2. 2. 3  Test  Body  Format. 


Note:  test  body  refers  to  the  code  vhich  is  compiled/executed  and  is 
not  necessarily  synonymous  with  an  Ada  unit  body. 


The  names  of  all  library  units  correspond  to  the  name  of  the  test  to 
vhich  they  are  associated. 


Class  B  tests  are  generally  library  procedures.  Other  units  are  used 
when  required  by  the  objective,  in  which  case  there  is  not  necessarily  a 
main  subprogram. 


XU 
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The  main  subprogram  of  all  executable  tests  is  a  procedure.  The  name 
of  this  procedure  is  identical  to  the  name  of  the  test. 


3. 2. 2. 3.1  Test  Initialization/Reporting  And  Test  Objective  Blocks. 

The  test  body  of  an  executable  test  has  the  following  logical 
execution  sequence: 

1.  Call  to  REPORT. TEST,  which  prints  the  test  identifier  and 
description. 

2.  Elaboration  of  objective-related  declarations. 

3.  Testing  of  the  objective  -  calls  to  REPORT. FAILED  and 
REPORT. NOT_APPLICABLE  as  appropriate. 

4.  Call  to  REPORT. RESULT,  which  prints  the  pass/fail  message. 

The  tests  generally  consist  of  a  single  procedure  with  the  objective  being 
tested  within  an  inner  DECLARE  block.  If  the  test  objective  is  divided 
into  multiple  sub-objectives,  each  sub-objective  is  tested  within  a 
separate  DECLARE  block.  For  objectives  which  require  packages  as  library 
units,  package  declarations  and  elaborations  are  arranged  to  result  in  the 
previously  described  execution  sequence. 


3. 2. 2. 3. 2  Ada  Unit  Bodies. 

The  format  of  the  statements  and  language  constructs  is  designed  to 
make  the  syntactic  and  semantic  structure  of  the  test  program  apparent.  In 
an  attempt  to  defeat  high-quality  optimizing  compilers,  which  may  execute 
or  remove  the  critical  portion  of  a  test  at  compile  time,  certain  coding 
practices  have  been  devised.  These  practices  include  calling  identity 
functions,  using  objects  in  statements  which  appear  to  have  no 
significance,  and  using  IF-THEN-ELSE  statements  instead  of  just  a  simple  IF 
statement . 


3.2.3  Macro  Substitutions. 

TST  type  tests  contain  macros  which  represent  implementation-dependent 
characteristics  of  the  language.  The  macros  are  given  as  identifiers  which 
begin  with  a  dollar  sign  ($).  Each  macro  must  be  replaced  with  an 
appropriate  textual  value  to  make  the  tests  suitable  for  compilation. 

The  substitutions  can  be  done  automatically  by  using  the  MACROSUBS 
program  distributed  with  the  ACVC.  This  program  will  request  the 
replacement  value  for  each  macro  and  then  edit  all  the  TST  tests  in  the 
suite  to  make  the  substitution. 

Appendix  A  contains  a  description  of  all  of  the  macros  used  in  the 
test  suite. 
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3.2.4  Processing  The  ACVC  Test  Programs. 

Processing  of  the  test  suite  consists  of: 

1.  Compiling  class  B  tests. 

2.  Compiling  and  linking  class  L  tests. 

3.  Compiling,  linking,  and  executing  class  A,  C,  D,  and  E  tests. 

It  is  recommended  that  the  suite  be  processed  by  chapter.  Generally,  the 
test  suite  is  processed  vithin  a  single  program  library  which  must  be 
initialized  as  described  below. 


3. 2. 4.1  Prerequisites. 

The  following  prerequisites  must  be  met  before  processing  the  test 
suite: 

1.  All  of  Ada  must  be  implemented  -  the  test  suite  attempts  to  cover 
the  entire  Ada  language. 

2.  The  support  package  REPORT  must  be  compiled,  checked  out,  and 
loaded  into  the  program  library  (see  Package  Report). 

3.  The  support  procedure  CHECKFILE  must  be  compiled,  checked  out,  and 
loaded  into  the  program  library  (see  Procedure  Checkfile). 

4.  The  support  package  SPPRT13  must  be  compiled  and  loaded  into  the 
program  library  (see  Package  Spprtl3). 


3. 2. 4. 2  Dependencies  Among  Tests. 

Test  files  which  use  character  position  8  (compilation  sequence)  in 
their  names  have  an  inherent  dependency.  These  test  files  must  be  compiled 
successively  and,  for  class  A,  C,  D,  E,  and  L  tests,  linked  together. 

Some  of  the  executable  file  I/O  tests  create  a  data  file  that  is  to  be 
used  by  a  subsequent  test.  In  these  instances,  the  tests  must  be  run  in 
sequence,  without  deleting  the  data  file  that  was  created.  The  tests  which 
create  such  a  file,  and  the  tests  that  depend  on  that  file  are: 

CE2108A  must  be  followed  by  CE2108B. 

CE2108C  must  be  followed  by  CE2108D. 

CE3112A  must  be  followed  by  CE3112B. 
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3. 2. 4. 3  Test  Applicability. 

Certain  tests  in  the  suite  are  concerned  vith  optional, 
implementation-dependent  features  of  the  language.  Hence,  some  of  these 
tests  may  not  be  applicable  to  all  implementations.  The  applicability  of 
each  test  is  based  on  the  criteria  given  in  the  test  file.  The  handling  of 
tests  concerned  vith  unsupported  features  is  described  above  under  Type 
Extensions. 

For  executable  tests,  lines  containing  these  implementation-dependent 
features  are  marked  n —  NA  ->  ERROR.".  If  an  implementation  does  not 
support  the  specified  feature,  then  these  constructs  must  be  rejected.  If 
the  constructs  so  indicated  are  rejected,  then  the  test  is  considered 
inapplicable  -  any  other  errors  reported  are  ignored.  If  the  constructs  so 
indicated  are  not  rejected,  then  the  test  remains  applicable  and  must 
execute  successfully. 

All  the  implementation-dependent  tests  are  compiled,  and  executed  if 
compiled  successfully,  during  a  validation  attempt  -  except  those  tests 
which  require  a  floating-point  DIGITS  value  that  exceeds  SYSTEM. MAX_DIGITS. 
All  results  for  a  particular  feature  must  be  consistent  (i.e.,  all  'PASSED' 
or  all  'NOT-APPLI CABLE'). 

Appendix  B  contains  the  test  applicability  criteria  for  all  the 
implementation-dependent  tests. 


3. 2.4.4  Test  Disputes. 

The  Certification  Body  has  defined  "dispute"  to  mean: 

For  the  purposes  of  validation,  a  dispute  is  constituted  by  any 
behavior  of  the  candidate  Ada  implementation  that  is  not 
explicitly  permitted  by  the  code  of  the  ACVC  tests,  by  the 
documentation  from  the  AMO  that  accompanies  the  ACVC  tapes,  or  by 
other  documentation  provided  to  the  vendor  by  the  Ada  Validation 
Facility  (AVF) . 

Disputes  must  be  brought  to  the  attention  of  the  AVF  as  soon  as  possible  so 
that  they  can  be  resolved  by  the  AVF  and  AVO.  A  dispute  related  to  a 
validation  attempt  should  be  sent  to  the  AVF  handling  the  validation. 
Other  disputes  of  ACVC  tests  can  be  sent  to  the  AMO. 


3. 2. 4. 5  Guidelines  For  Modifying  Tests. 

It  is  expected  that  some  tests  will  require  modifications  of  code, 
processing,  or  evaluation  in  order  to  compensate  for  legitimate 
implementation  behavior.  Modifications  are  made  vith  the  approval  of  the 
AVO,  and  are  made  in  cases  vhere  legitimate  implementation  behavior 
prevents  the  successful  completion  of  an  (othervlse)  applicable  test. 
Examples  of  such  modifications  include: 
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.  Adding  a  length  clause  to  alter  the  default  size  of  a  collection. 

.  Creating  split  tests. 

.  Confirming  that  messages  produced  by  an  executable  test 
demonstrate  conforming  behavior  that  wasn't  anticipated  by  the 
test  (such  as  raising  one  exception  instead  of  another). 

No  original  test  can  be  modified;  copies  must  be  made.  It  is 
recommended  that  the  copies  be  named  by  appending  an  alpha-numeric 
character  to  the  <name>  portion  of  the  original  test  file.  If  possible, 
the  line  numbers  of  the  original  test  should  remain  intact. 

Split  tests  can  be  created  for  class  B  and  L  tests.  Split  tests  have 
certain  lines  commented  out  to  facilitate  catching  any  previously 
undetected  errors.  Split  tests  can  also  be  used  to  ensure  that  all  legal 
constructs  are  passed. 


3.3  Validation  Support  Tools. 

The  folloving  validation  tools  are  used  to  a)  provide  additional 
information  about  an  implementation,  and  b)  reduce  the  effort  required  to 
perform  a  validation  attempt. 


3.3.1  The  Ada  Validation  Assistant  Tool. 

3. 3. 1.1  Description. 

The  Ada  Validation  Assistant  Tool  (AVAT)  is  a  set  of  five  programs 
that  test  implementation-dependent  features  and  produce  lists  of  possibly 
inapplicable  tests.  Although  it  is  not  part  of  the  test  suite,  the  AVAT 
system  can  assist  in  the  validation  process  by  providing  information  about 
the  implementation. 

AVAT  attempts  to  determine  whether  certain  features  of  the  language 
are  supported  by  the  implementation.  These  features  include  predefined 
types  other  than  those  required  by  the  language  and  certain  forms  of 
representation  clauses.  AVAT  also  attempts  to  measure  the  degree  to  which 
some  features  are  supported,  including  fixed-  and  floating-point  precision, 
and  compilation  of  generic  specifications  and  bodies  in  separate  files. 
Finally,  AVAT  reports  the  values  of  many  implementation-dependent  values, 
including  integer  type  bounds,  real  type  accuracies  and  ranges,  and  the 
constants  declared  in  the  package  SYSTEM. 

For  the  features  of  the  language  that  are  not  (fully)  supported,  the 
AVAT  programs  report  lists  of  ACVC  tests  that  might  be  inapplicable  due  to 
the  lack  of  (full)  support.  These  lists  may  not  be  complete;  that  is, 
there  may  be  unlisted  tests  vhich  are  inapplicable  due  to  an 
implementation's  lack  of  support  for  a  particular  feature.  Likewise,  the 
lists  may  not  be  entirely  accurate  for  a  particular  implementation;  that 
is,  due  to  implementation  decisions  not  anticipated  by  AVAT's  designers,  a 
test  may  be  listed  vhen  it  is  actually  applicable  to  the  Implementation. 
The  final  determination  of  the  applicability  of  a  test  depends  on  the 
specific  criteria  given  in  the  text  of  the  test,  the  agreement  of  test 
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results  with  the  vendor's  documentation,  and,  in  some  cases,  the  vendor's 
explanation  of  unusual  test  results.  It  is  the  vendor's  responsibility  to 
reconcile  any  inconsistencies;  for  validation  purposes,  justification  of 
inconsistencies  must  be  provided  to  the  AVF  in  the  form  of  a  test  dispute. 

Each  AVAT  program  consists  of  a  data  collection  and  reporting  package 
(common  to  the  five  AVAT  programs),  a  number  of  auxiliary  library 
procedures,  and  a  main  procedure  which  imports  the  package  and  invokes  the 
auxiliary  procedures.  Some  of  the  auxiliary  procedures  simply  provide 
section  headers  for  the  report,  and  others  provide  the  values  of 
system- defined  constants.  The  remaining  procedures  (the  majority)  are  used 
to  determine  whether  specific  language  features  are  supported.  There  are 
two  or  more  versions  of  each  such  procedure.  For  example,  the  procedure 
which  tests  for  support  of  'SIZE  clauses  for  integer  types  occurs  in  four 
versions.  The  first  version  contains  no  'SIZE  clauses;  if  it  is  executed, 
it  stores  (in  a  structure  declared  in  the  package)  a  message  that  'SIZE 
clauses  are  not  supported  for  integer  types,  and  a  list  of  ACVC  tests  that 
are  therefore  potentially  inapplicable.  The  second  version  contains  a 
'SIZE  clause  specifying  the  implementation's  default  size;  if  it  executes, 
it  stores  a  message  that  only  default  size  specifications  are  accepted,  and 
a  corresponding  list  of  potentially  inapplicable  ACVC  tests.  Likewise,  the 
third  and  fourth  versions  contain  intermediate  and  minimal  size 
specifications  and  store  corresponding  messages  and  lists  of  tests.  The 
four  versions  of  the  procedure  must  be  submitted  to  the  compiler  in  the 
given  order.  The  last  one  to  successfully  compile  will  be  the  version 
invoked  vhen  the  main  program  executes;  thus  the  appropriate  message  and 
test  list  will  be  reported. 

The  AVAT  programs  are  organized  as  follows: 

COMMON  PACKAGE  DAT ACO LLECT ION 

This  package  collects  and  reports  the  messages  and  lists  of 
potentially  inapplicable  tests. 

Specification  DATSPEC.ADA 

Body  DATBODY. ADA 

PART  ONE  AVATNUM 

This  program  reports  on  numeric  type  declarations  and 
characteristics. 

Main  procedure  AVATNUM. ADA 

Auxiliary  procedures  AVAT000.ADA  ..  AVAT006.ADA 

AVAT007 . TST 

AVAT008 . ADA  ..  AVAT012 . ADA 

AVAT013.TST 

AVAT014 . ADA 

AVAT015.TST 

AVAT016 . ADA  ..  AVAT026 . ADA 
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PART  TVO  AVATLEN 

This  program  reports  on  the  support  for  length  clauses. 

Main  procedure  AVATLEN. ADA 

Auxiliary  procedures  AVAT100.ADA  ..  AVAT134.ADA 

AVAT135.TST 

AVAT136.ADA 

AVAT137.TST 

AV AT 138. ADA  ..  AVAT154. ADA 
PART  THREE  AVATREP 

This  program  reports  on  the  support  for  enumeration  and  record 
representation  clauses  and  address  clauses.  Some  of  the 

auxiliary  procedures  in  this  program  depend  on  the  support 

package  SPPRT13. 

Main  procedure  AVATREP. ADA 

Auxiliary  procedures  AVAT200.ADA  ..  AVAT227.ADA 

PART  FOUR  AVATGEN 

This  program  reports  on  the  support  for  separate  compilation  of 
generic  specifications,  bodies,  and  subunits,  and  for  file  I/O. 

Main  procedure  AVATGEN. ADA 

Auxiliary  procedures  AVAT300.ADA  ..  AVAT335. ADA 

PART  FIVE  AVATSTD 

This  program  reports  the  values  of  constants  and  type 
characteristics  in  the  packages  STANDARD  and  SYSTEM. 

Main  procedure  AVATSTD. ADA 

Auxiliary  procedures  AVAT400.ADA  ..  AVAT411.ADA 


3.3. 1.2  Compilation. 

The  five  programs  that  make  up  AVAT  may  be  processed  in  any  order; 
hovever,  the  order  of  compilation  vithin  each  program  is  crucial.  The 
specification  of  package  DATACOLLECTION  must  be  compiled  as  the  first  unit 
in  each  program;  the  body,  of  course,  may  be  compiled  at  any  subsequent 
time  before  the  link  step.  The  auxiliary  procedures  must  be  compiled  after 
the  package  and  before  the  main  procedure,  since  they  import  the  package 
and  the  main  procedure  imports  the  auxiliary  procedures.  It  is  especially 
important  to  note  that  the  auxiliary  procedures  must  be  compiled  in  the 
order  given  by  their  file  names,  since  the  success  of  the  programs  depends 
on  the  required  library  management.  Note  that  this  compilation  order 
requirement  prohibits  the  use  of  any  sort  of  concurrent  or  interleaved 
compilation,  including  the  use  of  batch  queues  vith  more  than  one  job 
running  at  the  same  time. 
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3. 3. 1.3  Interpretation  Of  Results. 

Vhen  the  five  AVAT  programs  execute,  they  report  the  values  of 
implementation-dependent  constants,  report  that  certain  features  are  (are 
not)  supported,  and  produce  lists  of  tests  which  are  potentially 
inapplicable  due  to  the  apparent  lack  of  support  of  certain  features.  The 
reports  should  be  read  and  carefully  considered  in  light  of  the  system 
documentation  and  known  implementation  decisions.  The  lists  of  potentially 
inapplicable  tests  serve  as  a  guide  in  determining  applicability,  but  final 
decisions  are  made  on  the  basis  of  test  behavior,  test-specific 
applicability  criteria,  and  consistency  with  documentation. 


3.3.2  Library  Support  Units. 

The  following  library  support  units  must  be  compiled  and  loaded  into 
the  program  library  that  is  used  when  compiling  and  linking  the  ACVC  tests. 


3. 3. 2.1  Reporting  Test  Results. 

3. 3. 2. 1.1  Package  Report. 

All  executable  tests  use  the  REPORT  support  package.  This  package 
contains  routines  to  1)  automate  reporting  of  test  results  and  2)  help 
prevent  optimizing  out  any  test  code.  Automation  of  reporting  test  results 
is  accomplished  with  a  set  of  procedures  which  identify  the  test  and 
indicate  its  result.  Optimization  is  defeated  with  a  set  of  identity 
functions. 

Package  REPORT  uses  most  of  the  Ada  features  used  throughout  the  test 
suite,  namely: 

type  INTEGER,  literals,  +,  -,  relations, 

type  CHARACTER,  literals,  &,  relations,  :« 

type  STRING,  literals,  &,  relations,  re¬ 
type  BOOLEAN,  literals,  AND,  OR,  NOT,  relations,  :- 

user-defined  enumeration  type,  literals,  relations,  :» 

object  declarations  (and  initialization)  for  the  above  types. 

subprogram  declarations,  bodies,  and  calls,  with  formal 
parameters  of  all  modes  and  of  the  above  types. 

IP  statements. 


Executable  tests  generally  follow  the  format: 

WITH  REPORT;  USE  REPORT; 

PROCEDURE  Test name  IS 

i 

I 


BEGIN 
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TEST  ("Testname",  "Description 
♦  *  « 

IP  ...  /»  CorrectValue  THEN 
FAILED  ("Reason"); 

END  IF; 

RESULT; 

END  Testname; 

The  specification  of  package  REPORT  is  given  in  the  file  REPSPEC.ADA. 
The  body  of  package  REPORT  is  given  in  the  file  REPBODY.ADA.  The 
specification  and  body  of  package  REPORT  are  also  given  in  Appendix  C. 

The  acceptance  tests  CZ1101A.ADA  and  CZ1102A.ADA  must  be  compiled  and 
executed  before  a  validation  attempt  to  ensure  correct  operation  of  REPORT. 
A  listing  of  the  output  for  CZ1101A.ADA  is  given  in  Appendix  E. 


3. 3. 2. 1.2  Allowable  Modifications  To  Package  Report. 

Since  the  body  of  package  REPORT  is  independent  of  the  tests 
themselves,  it  can  be  modified  to  use  only  those  implementation  features 
that  are  actually  vorking.  Modifications  made  for  a  validation  attempt 
must  be  presented  to  the  AVF. 


3. 3. 2. 2  File  I/O. 

3. 3. 2. 2.1  Procedure  CheckFile. 

Some  of  the  executable  file-I/0  tests  (CE...  tests)  use  a  checking 
procedure  called  CHECKFILE.  CHECKFILE  is  used  to  determine  the 
implementation's  text  file  characteristics. 

The  source  code  for  this  procedure  is  found  in  the  file  CHECKFILE. ADA. 
The  body  of  procedure  CHECKFILE  is  also  given  in  Appendix  D. 

The  acceptance  test  CZ1103A.ADA  must  be  compiled  and  executed  before  a 
validation  attempt  to  ensure  correct  operation  of  CHECKFILE.  CZ1103A 
checks  that  errors  in  text  files  are  properly  detected;  therefore,  CZ1103A 
will  print  some  failure  messages  vhen  it  is  executed.  The  presence  of 
these  messages  does  not  mean  the  test  has  failed.  A  listing  of  the  output 
for  CZ1103A.ADA  is  given  in  Appendix  E. 


3. 3. 2. 3  Address  Clauses. 

3. 3. 2. 3.1  Package  Spprtl3. 

Package  SFPRT13  contains  functions  which  return  values  of  type 
SYSTEM. ADDRESS  for  use  in  ADDRESS  clauses.  Only  the  specification  of  this 
package  is  distributed  with  the  ACVC;  the  body  must  be  supplied  by  the 
implementer.  Spprtl3  is  required  for  running  test  B91001H.ADA,  many 
chapter  13  tests  (CD...  tests),  and  AVAT. 
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3. 3. 2. 3. 2  Allowable  Modifications  To  Package  Spprtl3. 

If  the  type  SYSTEM. ADDRESS  is  defined  to  be  static,  then  the  functions 
in  package  SPPRT13  can  be  replaced  vith  constants.  Modifications  made  for 
a  validation  attempt  must  be  presented  to  the  AVF. 
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APPENDIX  A 

Macros  and  Their  Descriptions 


Following  is  the  information  contained  in  the  MACRO. DFS  file.  Each 
macro  definition  includes: 

1.  The  macro  itself. 

2.  A  description  of  what  the  replacement  value  represents. 

3.  A  list  of  tests  which  depend  on  the  macro. 

4.  An  example  replacement  value. 


—  $MAX_IN_LEN 

—  AN  INTEGER  LITERAL  GIVING  THE  MAXIMUM  LENGTH  PERMITTED  BY  THE 

—  COMPILER  FOR  A  LINE  OF  ADA  SOURCE  CODE  (NOT  INCLUDING  AN  END-OF-LINE 

—  CHARACTER). 

—  USED  IN:  A26007A 

MAX_IN  LEN  60 

—  $BIG_ID1 

—  AN  IDENTIFIER  IN  WHICH  THE  NUMBER  OF  CHARACTERS  IS  $MAX  IN  LEN. 

—  USED  IN:  C23003A  C23003B  C23003C  B23003D  B23003E  C230O3G 

C23003H  C23003I  C23003J  C35502D  C35502F 

BIGIDl 

AAAAAAAAA_ AAAAAAAAA_AAAAAAAAA_ AAAAAAAAA_AAAAAAAAA_AAAAAAAAA 1 

—  $BIG  ID2 

—  AN  IDENTIFIER  IN  WHICH  THE  NUMBER  OF  CHARACTERS  IS  $MAX_IN_LEN, 

—  DIFFERING  FROM  $BIG_ID1  ONLY  IN  THE  LAST  CHARACTER. 

—  USED  IN:  C23003A  C23003B  C23003C  B23003F  C23003G  C23003H 

C23003I  C23003J 

BIGID2 

AAAAAAAAA  AAAAAAAAA  AAAAAAAAA  AAAAAAAAA  AAAAAAAAA  AAAAAAAAA2 
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—  $BIG  ID3 

--  AN  IDENTIFIER  IN  WHICH  THE  NUMBER  OF  CHARACTERS  IS  $MAX  IN  LEN. 

—  USED  IN:  C23003A  C23003B  C23003C  C23003G  C23003H  C23503I 

C23003J 


BIG  ID3 


AAAAAAAAA  AAAAAAAAA  AAAAAAAAA3AAAAAAAAA  AAAAAAAAA  AAAAAAAAAA 


—  $BIG  ID4 

—  AN  IDENTIFIER  IN  WHICH  THE  NUMBER  OF  CHARACTERS  IS  $MAX_IN_LEN, 

—  DIFFERING  FROM  $BIG  ID3  ONLY  IN  THE  MIDDLE  CHARACTER. 

—  USED  IN:  C23003A  C23003B  C23003C  C23003G  C23003H  C23003I 

C23003J 


BIG  ID4 


AAAAAAAAA  AAAAAAAAA  AAAAAAAAA 4 AAAAAAAAA  AAAAAAAAA  AAAAAAAAAA 


—  $BIG_STRING1 

—  A  STRING  LITERAL  (WITH  QUOTES)  WHOSE  CATENATION  WITH  $BIG  STRING2 

—  ($BIG_STRING1  &  $BIG  STRING 2)  PRODUCES  THE  IMAGE  OF  $BIG_lDl. 

—  USED  IN:  C35502D  C35502P 

BIG  STRING 1  "AAAAAAAAA  AAAAAAAAA  AAAAAAAAA  " 


—  $BIG_STRING2 

—  A  STRING  LITERAL  (WITH  QUOTES)  WHOSE  CATENATION  WITH  $BIG  STRING 1 

—  (SBIGSTRINGl  &  $BIG  STRING 2)  PRODUCES  THE  IMAGE  OF  $BIG_lDl. 

—  USED  IN:  C35502D  C35502F 

BIG  STRING2  "AAAAAAAAA  AAAAAAAAA  AAAAAAAAAl" 


—  $MAX_STRING_LITERAL 

—  A  STRING  LITERAL  CONSISTING  OF  $MAX_IN  LEN  CHARACTERS  (INCLUDING  THE 

—  QUOTE  CHARACTERS). 

—  USED  IN:  A26007A 
MAX  STRING_LITERAL 

*CCCCCCC10CCCCCCCC20CCCCCCCC30CCCCCCCC40CCCCCCCC50CCCCCCCC59" 


—  $NEG_BASED_INT 

—  A  BASED_INTEGER  LITERAL  (PREFERABLY  BASE  8  OR  16)  WHOSE  HIGHEST  ORDER 

—  NON-ZERO  BIT  WOULD  FALL  IN  THE  SIGN  BIT  POSITION  OF  THE 

—  REPRESENTATION  FOR  SYSTEM. MAX  INT,  I.E.,  AN  ATTEMPT  TO  WRITE  A 

—  NEGATIVE  VALUED  LITERAL  SUCH  AS  -2  BY  TAKING  ADVANTAGE  OF  THE 

—  BIT  REPRESENTATION. 

—  USED  IN:  E24201A 

NEGBASEDINT  16IFFFFFFFE# 

$BIG_INT_LIT 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  298,  BUT  WHICH  HAS 

—  ($MAX_IN_LEN  -  3)  LEADING  ZEROES. 

—  USED  IN:  C24003A 
BIGINTLIT 

000000000000000000000000000000000000000000000000000000000298 
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$BIG_REAL  LIT 

—  A  UNIVERSAL  REAL  LITERAL  VHOSE  VALUE  IS  690.0,  BUT  WHICH  HAS 

—  ($MAX_IN_LEN  -  5)  LEADING  ZEROES. 

—  USED  IN:  C24003B  C24003C 

BIGREALLIT 

0000000000000000000000000000000000000000000000000000000690 . 0 

—  $MAX_LEN_INT_BASED  LITERAL 

—  A  BASED  INTEGER  LITERAL  (USING  COLONS)  VHOSE  VALUE  IS  2:11:,  HAVING 

—  ($HAX_IN_LEN  -  5)  ZEROES  BETWEEN  THE  FIRST  COLON  AND  THE  FIRST  1. 

—  USED  IN:  C2A009A 

MAX  LEN  INT  BASED  LITERAL 

"2 : O0OOO<3OOOOOffOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOll : 

—  SMAXLEN  REAL_BASED_LITERAL 

—  A  BASED  REAL  LITERAL  (USING  COLONS)  VHOSE  VALUE  IS  16:F.E:,  HAVING 

—  ( $MAX_IN_LEN  -  7)  ZEROES  BETWEEN  THE  FIRST  COLON  AND  THE  F. 

—  USED  IN:  C2A009A 

MAX  LEN  REAL  BASED  LITERAL 

16 : OSOOOOOOOOOOSOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOF . E : 

—  SBLANKS 

—  A  SEQUENCE  OF  ($MAX_IN  LEN  -  20)  BLANKS. 

—  USED  IN:  B22001A  B22501B  B22001C  B22001D  B22001E  B22001F 

B22001G  B22001I  B22001J  B22001K  B22001L  B22001M 

B22001N 

<  LIMITS  OF  SAMPLE  SHOWN  BY  ANGLE  BRACKETS  > 

BLANKS 

—  SMAXDIGITS 

—AN  INTEGER  LITERAL  WHOSE  VALUE  IS  SYSTEM. MAXDIGITS. 

—  USED  IN:  B35701A  CD7102B 

MAXDIGITS  6 

—  SNAME 

—  THE  NAME  OP  A  PREDEFINED  INTEGER  TYPE  OTHER  THAN  INTEGER, 

—  SHORTINTEGER,  OR  LONGINTEGER. 

—  (IMPLEMENTATIONS  WHICH  HAVE  NO  SUCH  TYPES  SHOULD  USB  AN  UNDEFINED 

—  IDENTIFIER  SUCH  AS  NO  SUCH  TYPE  AVAILABLE.) 

—  USED  IN:  AVAT007  C4c23lD  l8600lX 
NAME  TINYINTEGER 

—  SFLOATNAMB 

—  THE  NAME  OF  A  PREDEFINED  FLOATING  POINT  TYPE  OTHER  THAN  FLOAT, 

—  SHORTFLOAT,  OR  LONG  FLOAT.  (IMPLEMENTATIONS  WHICH  HAVE  NO  SUCH 
--  TYPES  SHOULD  USE  AN  UNDEFINED  IDENTIFIER  SUCH  AS  NO  SUCH_TYPE.) 

—  USED  IN:  AVAT013  B86001Y 

FLOAT  NAME  SHORT  SHORT  FLOAT 
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—  SFIXED  NAME 

—  THE  NAME  OP  A  PREDEFINED  FIXED  POINT  TYPE  OTHER  THAN  DURATION. 

—  (IMPLEMENTATIONS  WHICH  HAVE  NO  SUCH  TYPES  SHOULD  USE  AN  UNDEFINED 

—  IDENTIFIER  SUCH  AS  NO  SUCH  TYPE.) 

—  USED  IN:  AVAT030  B8&001Z- 

FIXED_NAME  NO_SUCH_FIXED_TYPE 

—  $INTEGER  FIRST 

—  AN  INTEGER  LITERAL,  WITH  SIGN,  WHOSE  VALUE  IS  INTEGER' FIRST. 

—  USED  IN:  C35503F  B54B01B 

INTEGER_FIRST  -32_768 

—  SINTEGER  LAST 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  INTEGER' LAST. 

—  USED  IN:  C35503F  B45232A  B45B01B 

INTEGERLAST  32_767 

—  $INTEGER_LAST_PLUS_1 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  INTEGER' LAST  +  1. 

—  USED  IN:  C45232A 
INTEGER_LAST_PLUS_1  32768 

—  $MIN_INT 

—  AN  INTEGER  LITERAL,  WITH  SIGN,  WHOSE  VALUE  IS  SYSTEM . MIN_INT . 

—  THE  LITERAL  MUST  NOT  CONTAIN  UNDERSCORES  OR  LEADING  OR  TRAILING 

—  BLANKS. 

—  USED  IN:  C35503D  C35503F  CD7101B 

MININT  -2147483648 

—  $MAX_INT 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  SYSTEM. MAXINT. 

—  THE  LITERAL  MUST  NOT  INCLUDE  UNDERSCORES  OR  LEADING  OR  TRAILING 

—  BLANKS. 

—  USED  IN:  C35503D  C35503F  C4A007A  CD7101B 

MAXINT  2147483647 

—  $MAX  INT_PLUS_1 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  SYSTEM . MAX_INT  +  1. 

—  USED  IN:  C45232A 

MAXINTPLUS1  2_147_483_648 

—  SLESSTHAN  DURATION 

—  A  REAL  LITERAL  (WITH  SIGN)  WHOSE  VALUE  (NOT  SUBJECT  TO 

—  ROUND-OFF  ERROR  IF  POSSIBLE)  LIES  BETWEEN  DURATION' BASE 'FIRST  AND 

—  DURATION' FIRST.  IF  NO  SUCH  VALUES  EXIST,  USE  A  VALUE  IN 

—  DURATION' RANGE. 

—  USED  IN:  C96005B 

LESS  THAN  DURATION  -75  000.0 
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—  SGREATER  THAN  DURATION 

—  A  REAL  LITERAL  WHOSE  VALUE  (NOT  SUBJECT  TO  ROUND-OFP  ERROR 

—  IP  POSSIBLE)  LIES  BETWEEN  DURATION' BASE' LAST  AND  DURATION' LAST.  IF 

—  NO  SUCH  VALUES  EXIST,  USE  A  VALUE  IN  DURATION 'RANGE. 

—  USED  IN:  C96005B 

GREATER_THAN_DURAT I ON  7  5_000 . 0 

—  $LESS_THAN  DURATION  BASE  FIRST 

—  A  REAL  LITERAL  (WITH  SIGN)  WHOSE  VALUB  IS  LESS  THAN 

—  DURATION' BASE' FIRST. 

—  USED  IN:  C96005C 

LESS_THAN_DURATION_BASE_FIRST  -131_073 . 0 

—  $GREATER_THAN  DURATION  BASE  LAST 

—  A  REAL  LITERAL  WHOSE  VALUE  IS  GREATER  THAN  DURATION' BASE' LAST. 

—  USED  IN:  C96005C 

GREATER_THAN_DURATION_BASE_LAST  131_073 . 0 

—  $COUNT_LAST 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  TEXTIO. COUNT' LAST. 

—  USED  IN:  CE3002B 

COUNTLAST  32767 

—  SFIELD  LAST 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  TEXTIO. FIELD' LAST. 

—  USED  IN:  CE3002C 

FIELDLAST  32_767 

—  $ILLEGAL_EXTERNAL_FILE  NAME1 

—  AN  ILLEGAL  EXTERNAL  FILE  NAME  (E.G. ,  TOO  LONG,  CONTAINING  INVALID 

—  CHARACTERS,  CONTAINING  WILD-CARD  CHARACTERS,  OR  SPECIFYING  A 

—  NONEXISTENT  DIRECTORY). 

—  USED  IN:  CE2103A  CE2102C  CE2102H  CE2103B  CE3102B  CE3107A 

I LLEGAL_EXTERNAL_FI LENAMEl  \NODIRECTORY\ FI LENAME 

—  $ILLEGAL_EXTERNAL_FILE_NAME2 

—  AN  ILLEGAL  EXTERNAL  FILE  NAME,  DIFFERENT  FROM  $EXTERNAL_FILE_NAME1 . 

—  USED  IN:  CE2102C  CE2102H  CE2103A  CE2103B 

I LLEGAL_EXTERNAL_F I LE_NAME  2  THIS-FILE-NAME-IS-TOO-LONG-FOR-MY-SYSTEM 

—  $ACC  SIZE 

—AN  INTEGER  LITERAL  WHOSE  VALUE  IS  THE  MINIMUM  NUMBER  OP  BITS 

—  SUFFICIENT  TO  HOLD  ANY  VALUE  OF  AN  ACCESS  TYPE. 

—  USED  IN:  CD1C03C  CD2A81A  CD2A81B  CD2A81C  CD2A81D  CD2A81E 

CD2A81F  CD2A81G  CD2A83A  CD2A83B  CD2A83C  CD2A83B 

CD2A83F  CD2A83G  ED2A86A  CD2A87A 

ACC  SIZE  32 
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--  $TASK  SIZE 

--AN  INTEGER  LITERAL  WHOSE  VALUE  IS  THE  NUMBER  OF  BITS  REQUIRED  TO 

—  HOLD  A  TASK  OBJECT  WHICH  HAS  A  SINGLE  ENTRY  WITH  ONE  INOUT  PARAMETER. 

—  USED  IN:  CD2A91A  CD2A91B  CD2A91C  CD2A91D  CD2A91E 

TASK_SIZE  128 

—  $MIN  TASK  SIZE 

—AN  INTEGER  LITERAL  WHOSE  VALUE  IS  THE  NUMBER  OF  BITS  REQUIRED  TO 

—  HOLD  A  TASK  OBJECT  WHICH  HAS  NO  ENTRIES,  NO  DECLARATIONS,  AND  "NULL;" 

—  AS  THE  ONLY  STATEMENT  IN  ITS  BODY. 

—  USED  IN:  CD2A95A 

MINTASKSIZE  64 

—  $NAME  LIST 

—  A  LIST  OF  THE  ENUMERATION  LITERALS  IN  THE  TYPE  SYSTEM. NAME,  SEPARATED 
—BY  COMMAS. 

—  USED  IN:  CD7003A 

NAME_LIST  OUR_VMS_ADA,  OUR_ULTRIX_ADA,  OURELNADA 

—  $DEFAULT_SYS_NAME 

—  THE  VALUE  OF~THE  CONSTANT  SYSTEM. SYSTEMNAME. 

—  USED  IN:  CD7004A  CD7004C  CD7004D 

DEFAULT_SYS_NAME  OUR_VMS_ADA 

—  SNEWSYS  NAME 

—  A  VALUE  OF  THE  TYPE  SYSTEM. NAME,  OTHER  THAN  $DEFAULT  SYSNAME.  IP 

—  THERE  IS  ONLY  ONE  VALUE  OF  THE  TYPE,  THEN  USE  THAT  VALUE? 

—  NOTE:  IF  THERE  ARE  MORE  THAN  TWO  VALUES  OF  THE  TYPE,  THEN  THE 

PERTINENT  TESTS  ARB  TO  BE  RUN  ONCE  FOR  EACH  ALTERNATIVE. 

—  USED  IN:  ED7004B1 

NEWSYSNAME  OURULTRIXADA 

—  $DEFAULT_STOR_UNIT 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  SYSTEM . STORAGEUNIT . 

—  USED  IN:  CD7005B  ED7005D3M  CD7005E 

DEFAULTSTORUNIT  16 

—  $NEW_STOR_UNIT 

—AN  INTEGER  LITERAL  WHOSE  VALUE  IS  A  PERMITTED  ARGUMENT  FOR 

—  PRAGMA  STORAGEUNIT,  OTHER  THAN  SDEFAULT  STOR  UNIT.  IF  THERE 

—  IS  NO  OTHER  PERMITTED  VALUE,  THEN  USE  THE  VALUE  OF 

—  $ SYSTEM. STORAGE  UNIT.  IF  THERE  IS  MORE  THAN  ONE  ALTERNATIVE, 

—  THEN  THE  PERTINENT  TESTS  SHOULD  BE  RUN  ONCE  FOR  BACH  ALTERNATIVE. 

—  USED  IN:  ED7005C1  ED7005D1  CD7005E 

NEWSTORJJNIT  8 

—  SDEFAULT  MEM  SIZE 

—  AN  INTEGER  LITERAL  WHOSE  VALUE  IS  SYSTEM. MEMORY  SIZE. 

—  USED  IN:  CD7006B  ED7006D3M  CD7006E 

DEFAULT  MEM  SIZE  655  360 


! 


( 
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—  $NEV  MEM  SIZE 

—AN  INTEGER  LITERAL  VHOSE  VALUE  IS  A  PERMITTED  ARGUMENT  FOR 

—  PRAGMA  MEMORY  SIZE,  OTHER  THAN  $DEFAULT_MEM  SIZE.  IF  THERE  IS  NO 

—  OTHER  VALUE,  THEN  USE  SDEFAULT  MEM  SIZE.  iF  THERE  IS  MORE  THAN 

—  ONE  ALTERNATIVE,  THEN  THE  PERTINENT  TESTS  SHOULD  BE  RUN  ONCE  FOR 

—  EACH  ALTERNATIVE.  IF  THE  NUMBER  OF  PERMITTED  VALUES  IS  LARGE,  THEN 

—  SEVERAL  VALUES  SHOULD  BE  USED,  COVERING  A  VIDE  RANGE  OF 

—  POSSIBILITIES. 

—  USED  IN:  ED7006C1  ED7006D1  CD7006E 

NEV_MEM_SIZE  1_048_576 

—  SLOVPRIORITY 

—AN  INTEGER  LITERAL  VHOSE  VALUE  IS  THE  LOVER  BOUND  OF  THE  RANGE 

—  FOR  THE  SUBTYPE  SYSTEM. PRIORITY. 

—  USED  IN:  CD7007C 

LOVPRIORITY  0 

—  $HIGH  PRIORITY 

—  AN  INTEGER  LITERAL  VHOSE  VALUE  IS  THE  UPPER  BOUND  OF  THE  RANGE 

—  FOR  THE  SUBTYPE  SYSTEM. PRIORITY. 

—  USED  IN:  CD7007C 

HIGHPRIORITY  3 

—  SMANTISSA  DOC 

—  AN  INTEGER  LITERAL  VHOSE  VALUE  IS  SYSTEM. MAXMANTISSA  AS  SPECIFIED 

—  IN  THE  IMPLEMENTOR'S  DOCUMENTATION. 

—  USED  IN:  CD7013B 

MANTISSADOC  31 

—  SDELTADOC 

—  A  REAL  LITERAL  VHOSE  VALUE  IS  SYSTEM. FINE_DELTA  AS  SPECIFIED  IN  THE 

—  IMPLEMENTOR'S  DOCUMENTATION. 

—  USED  IN:  CD7013D 

DELTADOC  0.000_000_000_465_661_287_307_739_558_602_5 

—  STICK 

—  A  REAL  LITERAL  VHOSE  VALUE  IS  SYSTEM. TICK  AS  SPECIFIED  IN  THE 

—  IMPLEMENTOR'S  DOCUMENTATION. 

—  USED  IN:  CD7104B 
TICK  0.001 
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Test  Applicability  Criteria 


Certain  tests  in  the  suite  may  be  considered  inapplicable  to  an 
implementation  depending  on  the  way  the  implementation  treats  the 
implementation-dependent  features  of  the  language.  A  brief  summary  of 
these  implementation-dependent  features  and  the  tests  they  affect  are 
listed  in  this  appendix. 

Note  that  the  applicability  of  each  one  of  these  tests  is  based  on  the 
criteria  listed  in  the  test  file.  All  potentially  inapplicable  tests  must 
still  be  compiled  -  except  those  tests  which  require  a  floating-point 
DIGITS  value  that  exceeds  SYSTEM . MAXDIGITS  -  and  executed  if  successfully 
compiled,  to  verify  the  implementation's  treatment  of  these  features.  All 
results  for  a  particular  feature  must  be  consistent. 

The  first  part  of  this  appendix  is  concerned  with  tests  for  which  the 
applicability  is  determined  at  compile  time.  Class  B  tests  that  are 
inapplicable  should  be  successfully  compiled.  Executable  test  that  are 
inapplicable  must  be  rejected  at  compile  time  as  a  result  of  the 
unsupported  feature.  Lines  containing  the  implementation-dependent 
features  are  marked  NA  ->  ERROR.". 


If  the  type  SHORTINTEGER  is  not  predefined,  then  the  following  tests 
are  inapplicable: 

B52004E. DEP  B55B09D. DEP  B86001V.DEP 
C45231B. DEP  C45304B.DEP  C45502B.DEP 
C45503B. DEP  C45504B.DEP  C45504E.DEP 
C45611B.DEP  C45613B.DEP  C45614B.DEP 
C45631B. DEP  C45632B.DEP  C55B07B.DEP 
CD7101E.DEP 
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If  the  type  LONG_INTEGER  is  not  predefined,  then  the  following  tests 
are  inapplicable: 


B52004D. DEP 
C45231C. DEP 
C45503C. DEP 
C45611C.DEP 
C45631C. DEP 
CD7101F.DEP 


B55B09C.DEP 
C45304C.DEP 
C45504C. DEP 
C45613C. DEP 
C45632C. DEP 


B86001V. DEP 
C45502C. DEP 
C45504F. DEP 
C45614C. DEP 
C55B07A.DEP 


If  the  type  SHORTFLOAT  is  not  predefined,  then  the  following  tests 
are  inapplicable: 

B86001T. DEP  C35702A.DEP 


If  the  type  LONGFLOAT  is  not  predefined,  then  the  following  tests  are 
inapplicable: 

B86001U. DEP  C35702B.DEP 


If  there  are  no  predefined  integer  types  other  than  INTEGER, 
SHORT  INTEGER,  and  LONG_INTEGER,  then  the  following  tests  are 
inapplicable: 

B86001X.TST  C45231D.TST  CD7101G.TST 


If  there  are  no  predefined  floating-point  types  other  th*>  >  FLOAT, 
SHORTFLOAT,  and  L0NG_FL0AT,  then  the  following  test  is  inapplicable: 

B86001Z.TST 


If  there  are  no  predefined  fixed-point  types,  then  the  following  test 
is  inapplicable: 

B86001Y.TST 


If  'SIZE  representation  clauses  for  boolean  types  are  not  supported, 
then  the  following  tests  are  inapplicable: 

CD2A64A. DEP  CD2A64C. DEP  CD2A65A.DEP 

CD2A65C.DEP  CD2A74A. DEP  CD2A76A.DEP 
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V 


If  'SIZE  represen 
supported,  then  the 

A39005B. DEP 
CD2A21A.DEP 
CD2A21D.DEP 
CD2A22B . DEP 
CD2A22E. DEP 
CD2A22K.DEP 
CD2A23A.DEP 
CD2A23D. DEP 
CD2A24B . DEP 
CD2A24E.DEP 
CD2A24H . DEP 
CD2A66B.DEP 


ation  clauses 
following  test 

CD1009B . DEP 
CD2A21B.DEP 
CD2A21E. DEP 
CD2A22C. DEP 
CD2A22F. DEP 
CD2A22I . DEP 
CD2A23B.DEP 
CD2A23E.DEP 
CD2A24C. DEP 
CD2A24F . DEP 
CD2A24I . DEP 
CD2A66D. DEP 


for  enumeration 
are  inapplicable: 

CD1009P. DEP 
CD2A21C.DEP 
CD2A22A. DEP 
CD2A22D. DEP 
CD2A22G.DEP 
CD2A22J.DEP 
CD2A23C. DEP 
CD2A24A. DEP 
CD2A24D. DEP 
CD2A24G.DEP 
CD2A24J . DEP 
ED2A26A. DEP 


types  are  not 


If  'SIZE  representation  clauses  for  integer  types  are  not  supported, 
then  the  following  tests  are  inapplicable: 


C87B62A. DEP 
CD1C03A. DEP 
CD2A31B. DEP 
CD2A32A.DEP 
CD2A32D. DEP 
CD2A32G.DEP 
CD2A32J . DEP 
CD2A65B.DEP 
CD2A76B. DEP 


CD1009A. DEP 
CD1C04A. DEP 
CD2A31C. DEP 
CD2A32B.DEP 
CD2A32E. DEP 
CD2A32H. DEP 
CD2A64B. DEP 
CD2A6SD. DEP 


CD10090. DEP 
CD2A31A. DEP 
CD2A31D.DEP 
CD2A32C.DEP 
CD2A32F. DEP 
CD2A32I.DEP 
CD2A64D. DEP 
CD2A74B.DEP 


If  'SIZE  representation  clauses  for  floating-point  types  are  not 
supported,  then  the  following  tests  are  inapplicable: 


CD1009C. DEP 
CD2A41C. DEP 
CD2A42A. DEP 
CD2A42D. DEP 
CD2A42G. DEP 
CD2A42J.DEP 


CD2A41A. DEP 
CD2A41D. DEP 
CD2A42B.DEP 
CD2A42E.DEP 
CD2A42H.DEP 


CD2A41B.DEP 
CD2A41E. DEP 
CD2A42C. DEP 
CD2A42F. DEP 
CD2A42I.DEP 
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If  'SIZE  representation  clauses  for  fixed-point  types  are  not 
supported,  then  the  following  tests  are  inapplicable: 

CD1009D. DEP  CD1009Q. DEP  CD1C04C.DEP 
CD2A51B. DEP  CD2A51C. DEP  CD2A51D. DEP 
CD2A51E. DEP  CD2AS2A. DEP  CD2A52B.DEP 
CD2A52C.DEP  CD2A52D. DEP  CD2A52G. DEP 
CD2A52H . DEP  CD2A52I .DEP  CD2A52J .DEP 
CD2A53A. DEP  CD2A53B. DEP  CD2A53C. DEP 
CD2A53D. DEP  CD2AS3E. DEP  CD2A54A.DEP 
CD2A54B. DEP  CD2A54C. DEP  CD2A54D. DEP 
CD2A54G.DEP  CD2AS4H. DEP  CD2A54I .DEP 
CD2A54J . DEP  ED2A56A. DEP 


If  'SIZE  representation  clauses  for  array  types  are  not  supported, 
then  the  following  tests  are  inapplicable: 

CD1009E. DEP  CD1009F. DEP  CD2A61A.DEP 
CD2A61B.DEP  CD2A61C. DEP  CD2A61D. DEP 
CD2A61E. DEP  CD2A61F. DEP  CD2A61G.DEP 
CD2A61H. DEP  CD2A61I.DBP  CD2A61J.DBP 
CD2A61K. DEP  CD2A61L. DEP  CD2A62A.DEP 
CD2A62B. DEP  CD2A62C. DEP  CD2A62D.DEP 
CD2A63A. DEP  CD2A63B. DEP  CD2A63C.DEP 
CD2A63D.DEP  CD2A64A. DEP  CD2A64B.DEP 
CD2A64C.DEP  CD2A64D.DEP  CD2A65A.DEP 
CD2A65B. DEP  CD2A65C.DEP  CD2A65D. DEP 
CD2A66A. DEP  CD2A66B.DEP  CD2A66C.DEP 
CD2A66D. DEP 


If  'SIZE  representation  clauses  for  record  types  are  not  supported, 
then  the  following  tests  are  inapplicable: 

CD1009G. DEP  CD2A71A.DEP  CD2A71B. DEP 
CD2A71C. DEP  CD2A71D. DEP  CD2A72A. DEP 
CD2A72B. DEP  CD2A72C. DEP  CD2A72D.DEP 
CD2A73A.DEP  CD2A73B. DEP  CD2A73C.DEP 
CD2A73D. DEP  CD2A74A.DEP  CD2A74B.DEP 
CD2A74C. DEP  CD2A74D.DEP  CD2A75A.DEP 
CD2A75B. DEP  CD2A75C. DEP  CD2A75D. DEP 
CD2A76A. DEP  CD2A76B . DEP  CD2A76C. DEP 
CD2A76D. DEP 


If  'SIZE  representation  clauses  for  private  types  are  not  supported, 
then  the  following  test  is  inapplicable: 

CD1009H. DEP 
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If  'SIZE  representation  clauses  for  limited  private 
supported,  then  the  folloving  test  is  inapplicable: 

CD1009I . DEP 


If  'SIZE  representation  clauses  for  access  types  are 
then  the  folloving  tests  are  inapplicable: 


CD2A81A.TST 
CD2A81D.TST 
CD2A81G.TST 
CD2A83C.TST 
CD2A83G.TST 
CD2A84C.DEP 
CD2A84F. DEP 
CD2A84I . DEP 
CD2A84H.DEP 
ED2A86A.TST 


CD2A81B.TST 
CD2A81E.TST 
CD2A83A.TST 
CD2A83E.TST 
CD2A84A. DEP 
CD2A84D.DEP 
CD2A84G. DEP 
CD2A84K.DEP 
CD2A84N.DEP 


CD2A81C.TST 
CD2A81F.TST 
CD2A83B.TST 
CD2A83F.TST 
CD2A84B . DEP 
CD2A84E.DEP 
CD2A84H.DEP 
CD2A84L.DEP 
CD2A87A.TST 


If  'SIZE  representation  clauses  for  task,  types  are  not 
the  folloving  tests  are  inapplicable: 

CD2A91A.TST  CD2A91B.TST  CD2A91C.TST 

CD2A91D.TST  CD2A91E.TST 


If  ' STORAGESIZE  representation  clauses  for  access 
supported,  then  the  folloving  tests  are  inapplicable: 


A39005C. DEP 
CD1009R. DEP 
CD2A83A.TST 
CD2A83E.TST 
CD2A84A. DEP 
CD2A84D. DEP 
CD2A84G.DEP 
CD2A84K.DEP 
CD2A84N. DEP 
CD2B11C.DEP 
CD2B11F. DEP 
CD2B15C.DEP 
ED2A86A.TST 


C87B62B.DEP 
CD1009S. DEP 
CD2A83B.TST 
CD2A83F.TST 
CD2A84B. DEP 
CD2A84E.DEP 
CD2A84H.DEP 
CD2A84L. DEP 
CD2B11A. DEP 
CD2B11D. DEP 
CD2B11G. DEP 
CD2B16A.DEP 


CD1009J.DEP 

CD1C03C.TST 

CD2A83C.TST 

CD2A83G.TST 

CD2A84C.DEP 

CD2A84F.DEP 

CD2A84I.DEP 

CD2A84M.DEP 

CD2B11B.DEP 

CD2B11E.DEP 

CD2B15B.DEP 

CD7205C.DEP 


If  'STORAGE  SIZE  representation  clauses  for  task 
supported,  tHen  the  folloving  tests  are  inapplicable: 


types  are  not 


not  supported, 


supported,  then 


types  are  not 


types  are  not 


A39005D. DEP 
CD1009T. DEP 
CD1C04B.DEP 


C87B62D. DEP 
CD1009U.DEP 
CD1C06A. DEP 


CD1009K.DEP 
CD1C03E.DEP 
CD7205D. DEP 


If  the  'SHALL  clause  is  not  supported,  then  the  following  tests  are 
inapplicable: 


A39005E.DEP 
CD1C03F. DEP 
CD2A53C.DEP 
CD2A54A.DEP 
CD2A54D.DEP 
CD2A54I.DEP 
CD2D11B.DEP 


C87B62C.DEP 
CD2A53A.DEP 
CD2A53D.DEP 
CD2A54B.DEP 
CD2A54G.DEP 
CD2A54J . DEP 
CD2D13A.DEP 


CD1009L.DEP 
CD2A53B. DEP 
CD2A53E.DEP 
CD2A54C.DE P 
CD2A54H.DEP 
CD2D11A.DEP 
ED2A56A. DEP 


If  enumeration  representation  clauses  are  not  supported,  then  the 
following  tests  are  inapplicable: 


AD1009M. DEP 
AD1C04D. DEP 
C35507J.DEP 
C35508J.DEP 
CD2A23B. DEP 
CD2A23E.DEP 
CD2A24C.DEP 
CD2A24F.DEP 
CD2A24I . DEP 
ED2A26A. DEP 


AD1009V. DEP 
C35502N. DEP 
C35507M.DEP 
CD1C03G. DEP 
CD2A23C. DEP 
CD2A24A. DEP 
CD2A24D.DEP 
CD2A24G.DEP 
CD2A24J.DEP 


AD1009V.DEP 
C35507I.DEP 
C35507N.DEP 
CD2A23A. DEP 
CD2A23D.DBP 
CD2A24B.DEP 
CD2A24E. DEP 
CD2A24H. DEP 
CD3021A. DEP 


If  enumeration  representation  clauses  for  non-contiguous  values  are 
not  supported,  then  the  following  tests  are  inapplicable: 


A39005F. DEP 
C35502M.DEP 
C35507M. DEP 
C35508J.DEP 
C55B16A. DEP 


C35502I.DEP 

C35502N.DEP 

C35507N.DEP 

C35508M.DEP 


C35502J.DEP 

C35507J.DEP 

C35508I.DEP 

C35508N.DEP 


If  enumeration  representation  clauses  for  types  other  than  character 
and  boolean  are  not  supported,  then  the  following  tests  are 
inapplicable: 


A39005F.DEP  C35502I.DEP  C35502J.DEP 

C35502H.DEP  C35502N.DEP 


If  enumeration  representation  clauses  for  character  types  are  not 
supported,  then  the  following  tests  are  inapplicable: 

C35507I . DEP  C35507J.DEP  C35507M.DEP 

C35507N.DEP  C55B16A.DEP 
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Compile  Time  Inapplicability 


If  enumeration  representation  clauses  for  boolean  types,  with 
representation  values  other  than  (FALSE  *>  0,  TRUE  ->1),  are  not 
supported,  then  the  following  tests  are  inapplicable: 

C35508I . DEP  C35508J.DEP  C35508M.DEP 
C35508N. DEP 


If  record  representation  clauses  are  not  supported,  then  the  following 
tests  are  inapplicable: 


A39005G.DEP 
CD1009Y. DEP 
CD1C04E.DEP 
CD4051B.DEP 
ED1D04A. DEP 


CD1009N. DEP 
CD1009Z. DEP 
CD4031A. DEP 
CD4051C. DEP 


CD1009X.DEP 
CD1C03H.DEP 
CD4051A. DEP 
CD7204C.DEP 


If  'ADDRESS  clauses  for  variables  are  not  supported,  or  if  the  type 
SYSTEM. ADDRESS  is  limited,  then  the  following  tests  are  inapplicable: 


CD5003B. DEP 
CD5003E. DEP 
CD5003H. DEP 
CD5011C. DEP 
CD5011I . DEP 
CD50110.DEP 
CD5012B. DEP 
CD5012I . DEP 
CD5013A. DEP 
CD5013G. DEP 
CD5013M. DEP 
CD5014A.DEP 
CD5014G.DEP 
CD5014M.DEP 
CD5014T. DEP 
CD5014Y. DEP 


CD5003C. DEP 
CD5003F. DEP 
CD5003I . DEP 
CD5011E.DEP 
CD5011K.DEP 
CD5011Q. DEP 
CD5012E.DEP 
CD5012J.DEP 
CD5013C.DEP 
CD5013I . DEP 
CD50130.DEP 
CD5014C.DEP 
CD5014I . DEP 
CD50140.DEP 
CD5014V. DEP 
CD5014Z. DEP 


CD5003D.DEP 
CD5003G. DEP 
CD5011A.DEP 
CD5011G.DEP 
CD5011M. DEP 
CD5012A. DEP 
CD5012F. DEP 
CD5012M. DEP 
CD5013E.DEP 
CD5013K.DEP 
CD5013S.DEP 
CD5014E.DEP 
CD5014K.DEP 
CD5014S. DEP 
CD5014X.DEP 


Compile  Time  Inapplicability 


If  'ADDRESS  clauses  for  constants  are  not  supported,  or  if  the  type 
SYSTEM. ADDRESS  is  limited,  then  the  following  tests  are  inapplicable: 


CD5011B. DEP 
CD5011H. DEP 
CD5011R. DEP 
CD5012D. DEP 
CD5012L. DEP 
CD5013F. DEP 
CD5013L. DEP 
CD5014B. DEP 
CD5014H.DEP 
CD5014N. DEP 
CD5014V. DEP 


CD5011D. DEP 
CD5011L. DEP 
CD5011S. DEP 
CD5012G.DEP 
CD5013B. DEP 
CD5013H.DEP 
CD5013N. DEP 
CD5014D. DEP 
CD5014J . DEP 
CD5014R.DEP 


CD5011F.DEP 
CD5011N.DEP 
CD5012C.DEP 
CD5012H.DEP 
CD5013D.DEP 
CD5013J.DEP 
CD5013R.DEP 
CD5014F. DEP 
CD5014L.DEP 
CD5014U.DEP 


If  'ADDRESS  clauses  for  subprograms  are  not  supported  ,  or  if  the  type 
SYSTEM. ADDRESS  is  limited,  then  the  following  tests  are  inapplicable: 

CD5007B. DEP 


If  the  pragmas  SYSTEMNAME,  STORAGEUNIT,  and  MEMORYSIZE  must  come  at 
the  beginning  of  a  program  library,  then  the  following  files  are 
ommitted  from  the  associated  test: 


ED7004B0.TST 

ED7005C0.TST 

ED7005D0.TST 

ED7006C0.TST 

ED7006D0.1ST 


ED7004B2.TST 

ED7005C2.TST 

ED7005D2.TST 

ED7006C2.TST 

ED7006D2.TST 


If  any  limitations,  other  than  those  specified  in  the  RM,  are  imposed 
on  the  use  of  the  pragmas  SYSTEMNAME,  STORAGEUNIT,  and  MEMORYSIZE, 
then  the  following  test  may  be  inapplicable: 

CD7004C.TST  CD7005E.TST  CD7006E.TST 


Consider  the  following  declarations: 

TYPE  F  IS  DIGITS  SYSTEM. MAXDIGITS; 

N  :  CONSTANT  :«  2.0  *  F' MACHINERADIX  **  P' MACHINEEMAX; 

If  the  declaration  of  N  is  rejected  on  the  grounds  that  evaluation  of 
the  expression  will  raise  an  exception,  then  the  following  test  is 
inapplicable: 


C4A013B . ADA 


Compile  Time  Inapplicability 


If  the  fixed-point  type  definitions 

DELTA  0.5  RANGE  -2. 0**10  ..  2. 0**10  -  0.5 
DELTA  1.0  RANGE  -2. 0**11  ..  2. 0**11  -  1.0 
DELTA  2. 0**10  RANGE  -2. 0**21  ..  2. 0**21  -  2. 0**10 

are  not  supported,  then  the  following  tests  are  inapplicable: 

C45531C.DEP  C45531D.DEP  C45532C.DEP 

C45532D. DEP 


If  the  fixed-point  type  definitions 

DELTA  0.5  RANGE  -2. 0**14  ..  2. 0**14  -  0.5 
DELTA  1.0  RANGE  -2. 0**15  ..  2. 0**15  -  1.0 
DELTA  2. 0**14  RANGE  -2. 0**29  ..  2. 0**29  -  2. 0**14 

are  not  supported,  then  the  following  tests  are  inapplicable: 

C45531G. DEP  C45531H.DEP  C45532G.DEP 

C45532H.DEP 


If  the  fixed-point  type  definitions 

DELTA  0.5  RANGE  -2. 0**30  ..  2. 0**30  -  0.5 
DELTA  1.0  RANGE  -2. 0**31  ..  2. 0**31  -  1.0 
DELTA  2. 0**30  RANGE  -2. 0**61  ..  2. 0**61  -  2. 0**30 

are  not  supported,  then  the  following  tests  are  inapplicable: 

C45531K. DEP  C45531L.DEP  C45532K.DEP 

C45532L. DEP 


If  the  fixed-point  type  definitions 

DELTA  0.5  RANGE  -2. 0**46  ..  2. 0**46  -  0.5 
DELTA  1.0  RANGE  -2. 0**47  ..  2. 0**47  -  1.0 
DELTA  2. 0**46  RANGE  -2. 0**93  ..  2. 0**93  -  2. 0**46 


are  not  supported,  then  the  following  tests  are  inapplicable: 

C455310. DEP  C45531P. DEP  C455320.DEP 
C45532P . DEP 
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Compile  Time  Inapplicability 


If  the  fixed-point  type  definitions 

DELTA  2.0**-12  RANGE  -0.5  ..  0.5  -  2.0**-12 

DELTA  2.0**-ll  RANGE  -1.0  ..  1.0  -  2.0**-ll 

DELTA  2.0**-10  RANGE  -2.0  ..  2.0  -  2.0**-10 

are  not  supported,  then  the  following  tests  are  inapplicable: 

C45531A. DEP  C45531B.DEP  C45532A.DEP 

C45532B.DEP 


If  the  fixed-point  type  definitions 

DELTA  2.0**-16  RANGE  -0.5  ..  0.5  -  2.0**-16 

DELTA  2.0**-15  RANGE  -1.0  ..  1.0  -  2.0**-15 

DELTA  2.0**-14  RANGE  -2.0  ..  2.0  -  2.0**-14 

are  not  supported,  then  the  following  tests  are  inapplicable: 

C45531E. DEP  C45531F.DEP  C45532E.DEP 

C45532F. DEP 


If  the  fixed-point  type  definitions 

DELTA  2.0**-32  RANGE  -0.5  ..  0.5  -  2.0**-32 

DELTA  2.0**-31  RANGE  -1.0  ..  1.0  -  2.0**-31 

DELTA  2.0**-30  RANGE  -2.0  ..  2.0  -  2.0**-30 

are  not  supported,  then  the  following  tests  are  inapplicable: 

C45531I . DEP  C45531J.DEP  C45532I.DEP 

C45532J.DEP 


If  the  fixed-point  type  definitions 

DELTA  2.0**-48  RANGE  -0.5  ..  0.5  -  2.0**-48 

DELTA  2.0**-47  RANGE  -1.0  ..  1.0  -  2.0**-47 

DELTA  2.0**-46  RANGE  -2.0  ..  2.0  -  2.0**-46 

are  not  supported,  then  the  following  tests  are  inapplicable: 

C45531M. DEP  C45531N.DEP  C45532M.DEP 

C45532N. DEP 
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Compile  Time  Inapplicability 


The  following  tests  depend  on  the  value  of  SYSTEM. MAX_DIGITS: 


C24113*. DEP 

C35705VDEP 

C35706*.DEP 

w 

C35707*.DEP 

C35708*.DEP 

C35802*. DEP 

C45241*.DEP 

C45321*. DEP 

C45421*.DEP 

C45521*.DEP 

C45524*.DEP 

C45621*.DEP 

C45641*.DEP 

C46012*.DEP 

Use  the  table  below 

to  determine 

which  of  these  tests 

» 

|  based  on  the  value 

of  SYSTEM.MAX_ 

DIGITS. 

Value  of 
MAX  DIGITS 


Last  Letter  of 
Test  Name  of 
Applicable  Tests 


If  the  value  of  SYSTEM. MAXDIGITS  >  35,  then  the  following  test  is 
inapplicable! 

C4A011A. ADA 


,  * .  Vi  *j 


Compile  Time  Inapplicability 


If  a  generic  library-subprogram  body  cannot  be  compiled  in  a  separate 
file  than  its  specification,  then  the  following  test  is  inapplicable: 

CA1012A*.DEP 


If  a  generic  library-pad  age  body  cannot  be  compiled  in  a  separate 
file  than  its  specification,  then  the  following  tests  are 
inapplicable: 

BC3204C*.DEP  BC3204D*.DEP 


If  a  generic,  non-library  package  body  cannot  be  compiled  as  a  subunit 
in  a  separate  file  than  its  specification,  then  the  following  test  is 
inapplicable: 

CA2009C*.DEP 


If  a  generic,  non-library  subprogram  body  cannot  be  compiled  as  a 
subunit  in  a  separate  file  than  its  specification,  then  the  following 
test  is  inapplicable: 

CA2009F*.DEP 


If  a  generic  procedure  cannot  have  subunits  which  are  compiled  in 
separate  files  than  the  generic  unit,  then  the  following  test  is 
inapplicable: 

CA3011A*. DEP 


If  package  SYSTEM  is  used  by  package  TEXTIO,  then  the  following  test 
is  inapplicable: 

C86001P. DEP 


If  SEQUENTIAL_IO  cannot  be  instantiated  with  an  unconstrained  array 
type,  then  the  following  tests  are  inapplicable: 

AE2101C. DEP  EE2201D. ADA 


If  SEQUENTIAL_IO  cannot  be  instantiated  with  a  record  type  with 
discriminants-  with  no  default  values,  then  the  following  tests  are 
inapplicable: 

AE2101C.DEP  EE2201E . ADA 
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Compile  Time  Inapplicability 


If  DIRECT  10  cannot  be  instantiated  vith  an  unconstrained  array  type, 
then  the  Tolloving  tests  are  inapplicable: 

AE2101H. DEP  EE2401D. ADA 


If  DIRECT_I0  cannot  be  instantiated  vith  a  record  type  vith 
discriminants  vith  no  default  values,  then  the  folloving  tests  are 
inapplicable: 

AE2101H.DEP  EE2401G. ADA 


If  there  are  no  strings  vhich  are  illegal  as  external  file  names,  then 
the  folloving  tests  are  inapplicable: 

CE2102C.TST  CE2102H.TST 


B  - 1 3 


Tests  Which  Report  "NOT-APPLICABLE" 


This  section  is  concerned  with  tests  that  can  detect,  at  runtime, 
certain  implementation  characteristics  that  make  the  tests  inapplicable. 
The  result  reported  for  these  tests  is  'NOT_APPLICABLE' .  These  tests  must 
compile  and  execute. 


If  USE_ERR0R  or  NAME  ERROR  is  raised  by  every  attempt  to  create  or 
open  a  text  file  with  mode  IN_FILE  (this  is  the  appropriate  behavior 
for  an  implementation  which  does  not  support  text  files  other  than 
standard  input  and  output;  See  AI-00332),  then  the  following  test 
should  report  NOT_APPLICABLE: 

CE3109A. ADA 


If  CREATE  with  mode  IN_FILE  is  supported  for  text  files,  then  the 
following  test  should  report  NOTAPPLI CABLE: 

CE3102E. ADA 


If  OPEN  with  mode  IN  FILE  is  supported  for  text  files,  then  the 
following  test  shoul3  report  NOT_APPLICABLE: 

CE3102J.ADA 


If  USE_ERROR  or  NAME_ERROR  is  raised  by  every  attempt  to  create  or 
open  a  text  file  with  mode  OUT_FILE  (this  is  the  appropriate  behavior 
for  an  implementation  which  does  not  support  text  files  other  than 
standard  input  and  output;  see  AI-00332),  then  the  following  tests 
should  report  NOTAPPLICABLE: 

CE2109C. ADA  CE3102A. ADA  CE3102B.TST 
CE3107B. ADA  CE3112C.ADA  CE3402D. ADA 
CE3403A. ADA  CE3406B. ADA  CE3407B. ADA 
CE3408B. ADA  CE3409A. ADA  CE3410A. ADA 
CE3605A. ADA  CE3605E.ADA  CE3706F. ADA 
CE3905B. ADA  EE3405B . ADA  EE3409F.ADA 
EE3410F. ADA 


If  CREATE  with  mode  OUT  FILE  is  supported  for  text  files,  then  the 
following  test  should  riport  N0T_APPLI CABLE: 

CE3102I . ADA 
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Tests  Which  Report  "NOT-APPLICABLE 


If  OPEN  with  mode  OUT_FILE  is  supported  for  text  files,  then  the 
following  test  should  report  NOT_APPLICABLE: 

CE3102K. ADA 


If  RESET  is  supported  for  text  files,  then  the  following  test  should 
report  NOT_APPLICABLE : 

CE3102F. ADA 


If  DELETE  for  text  files  is  supported,  then  the  following  test  should 
report  N0T_APPLI CABLE: 

CE3102G. ADA 


If  USEERROR  or  NAME  ERROR  is  raised  by  every  attempt  to  create  or 
open  a  text  file  (this  is  the  appropriate  behavior  for  an 
implementation  which  does  not  support  text  files  other  than  standard 
input  and  output;  see  AI-00332),  then  the  following  tests  should 
report  NOT  APPLICABLE: 


CE2108A. ADA 
CE2108D. ADA 
CE3104A. ADA 
CE3108B. ADA 
CE3112B. ADA 
CE3203A. ADA 
CE3301B. ADA 
CE3305A. ADA 
CE3402C. ADA 
CE3403E. ADA 
CE3404B. ADA 
CE3405A. ADA 
CE3405D. ADA 
CE3406D. ADA 
CE3408A. ADA 
CE3409D. ADA 
CE3410C. ADA 
CE3410F. ADA 
CE3411C. ADA 
CE3413C. ADA 
CE3602C. ADA 
CE3604A. ADA 
CE3605C. ADA 
CE3606B. ADA 
CE3704D. ADA 
CE3704M. ADA 
CE3706D. ADA 
CE3804B. ADA 


CE2108B.ADA 
CE3102H.ADA 
CE3104B. ADA 
CE3110A. ADA 
CE3112D.ADA 
CE3208A. ADA 
CE3301C. ADA 
CE3402A. ADA 
CE3403B. ADA 
CE3403F. ADA 
CE3404C.ADA 
CE340SB. ADA 
CE3406A. ADA 
CE3407A. ADA 
CE3408C . ADA 
CE3409E. ADA 
CE3410D. ADA 
CE3411A. ADA 
CE3412A. ADA 
CE3602A. ADA 
CE3602D. ADA 
CE3604B . ADA 
CE3605D. ADA 
CE3704A. ADA 
CE3704E. ADA 
CE3704N. ADA 
CE3706G. ADA 
CE3804C. ADA 


CE2108C. ADA 
CE3103A. ADA 
CE3108A. ADA 
CE3112A. ADA 
CE3114A. ADA 
CE3301A. ADA 
CE3302A. ADA 
CE3402B. ADA 
CE3403C. ADA 
CE3404A. ADA 
CE3404D. ADA 
CE3405C. ADA 
CE3406C. ADA 
CE3407C. ADA 
CE3409C. ADA 
CE3409F. ADA 
CE3410E. ADA 
CE3411B. ADA 
CE3413A. ADA 
CE3602B. ADA 
CE3603A. ADA 
CE3605B. ADA 
CE3606A. ADA 
CE3704B. ADA 
CE3704F. ADA 
CE37040. ADA 
CE3804A. ADA 
CE3804D. ADA 


Tests  Which  Report  "NOT-APPLICABLE" 


CE3804E. ADA 
CE3804H. ADA 
CE3804K. ADA 
CE3804N. ADA 
CE3805A. ADA 
CE3806B. ADA 
CE3806G.ADA 
CE3905C. ADA 
CE3906B.ADA 
CE3906F. ADA 
EE3412C. ADA 


CE3804F. ADA 
CE3804I.ADA 
CE3804L. ADA 
CE38040. ADA 
CE3805B. ADA 
CE3806D. ADA 
CE3806H. ADA 
CE3905L. ADA 
CE3906C. ADA 
EE3203A. ADA 


CE3804G.ADA 
CE3804J.ADA 
CE3804M. ADA 
CE3804P. ADA 
CE3806A. ADA 
CE3806E. ADA 
CE3905A.ADA 
CE3906A. ADA 
CE3906E.ADA 
EE3402B. ADA 


If  RESET  is  not  supported  for  text  files,  then  the  following  tests 
should  report  NOT_APPLICABLE: 

CE3104C. ADA  CE3115A. ADA 


If  DELETE  for  text  files  is  not  supported,  then  the  following  tests 
should  report  NOTAPPLICABLE: 

CE3110A . ADA  CE3114A.ADA 


If  association  of  multiple  internal  text  files  to  a  single  external 
file  is  not  supported,  then  the  following  tests  should  report 
NOTAPPLICABLE: 

CE2110B. ADA  CE3111A. ADA  CE3111B. ADA 
CE3111C. ADA  CE3111D. ADA  CE3111E. ADA 
CE3114B. ADA  CE3115A. ADA 


If  USEERROR  or  NAME_ERROR  is  raised  by  every  attempt  to  create  or 
open  a  sequential  file  with  mode  IN  FILE  (this  is  the  appropriate 
behavior  for  an  implementation  which  does  not  support  sequential 
files;  see  AI-00332)'  then  the  following  test  should  report 
NOTAPPLICABLE: 

CE2105A. ADA 


If  CREATE  and  OPEN  with  mode  IN_FILE  are  supported  for  sequential 
files,  then  the  following  tests  should  report  N0T_APPLI CABLE: 


CE2102D. ADA 


CE2102N. ADA 


Tests  Which  Report  "NOT-APPLICABLE 


If  RESET  to  mode  IN_FILE  is  supported  for  sequential  files  ,  then  the 
following  tests  should  report  NOT_APPLI CABLE: 

CE21020. ADA  CE2111F. ADA  CE2111I.ADA 
CE2204C. ADA 


If  USE_ERR0R  or  NAME_ERROR  is  raised  by  every  attempt  to  create  or 
open  a  sequential  file  with  mode  OUT  FILE  (this  is  the  appropriate 
behavior  for  an  implementation  which  3oes  not  support  sequential 
files;  see  AI-00332),  then  the  following  tests  should  report 
NOTAPPLICABLE: 

CE2102A. ADA  CE2102C.TST  CE2102X. ADA 
CE2106A. ADA  CE2108E. ADA  CE2109A. ADA 
CE2110A. ADA 


If  CREATE  and  OPEN  with  mode  OUTFILE  are  supported,  then  the 
following  tests  should  report  NOT_APPLICABLE: 

CE2102E. ADA  CE2102P. ADA 


If  RESET  to  mode  OUT  FILE  is  supported  for  sequential  files,  then  the 
following  test  shoul3  report  NOTAPPLICABLE: 

CE2102Q. ADA 


If  RESET  to  mode  OUTFILE  is  not  supported  for  sequential  files,  then 
the  following  tests  should  report  NOTAPPLI CABLE: 

CE2111C. ADA  CE2111D. ADA  CE2111F. ADA 
CE2111I.ADA 


If  DELETE  for  sequential  files  is  not  supported,  then  the  following 
tests  should  report  NOT_APPLICABLE: 

CE2106A. ADA  CE2110A. ADA 


If  association  of  multiple  internal  sequential  files  to  a  single 
external  file  is  not  supported,  then  the  following  tests  should  report 
NOTAPPLI CABLE: 

CE2107A. ADA  CE2107B . ADA  CE2107C. ADA 
CE2107D. ADA  CE2111D. ADA 


Tests  Which  Report  "NOT-APPLICABLE" 


If  USE  ERROR  or  NAME_ERROR  is  raised  by  every  attempt  to  create  or 
open  a  sequential  file  (•'his  is  the  appropriate  behavior  for  an 
implementation  which  does  not  support  sequential  files;  see  AI-00332), 
then  the  following  tests  should  report  NOT_APPLICABLE: 


CE2103C. ADA 
CE2104B. ADA 
CE2108F. ADA 
CE2201A. ADA 
CE2201F. ADA 
CE2201I.ADA 
CE2201L. ADA 
CE2204A. ADA 
CE2204D. ADA 
CE2210A. ADA 


CE2102G. ADA 
CE2108A. ADA 
CE2111A. ADA 
CE2201B. ADA 
CE2201G. ADA 
CE2201J. ADA 
CE2201M. ADA 
CE2204B. ADA 
CE2205A. ADA 


CE2104A. ADA 
CE2108B. ADA 
CE2115B. ADA 
CE2201C. ADA 
CE2201H. ADA 
CE2201K. ADA 
CE2201N. ADA 
CE2204C. ADA 
CE2208B. ADA 


If  USEERROR  or  NAME_ERROR  is  raised  by  every  attempt  to  create  or 
open  a  direct  access  file  with  mode  IN_FILE  (this  is  the  appropriate 
behavior  for  an  implementation  which  does  not  support  direct  access 
files;  see  AI-00332),  then  the  following  tests  should  report 


NOTAPPLICABLE: 

CE2105B. ADA 

CE2401E. ADA 

CE2401F. ADA 

CE2401H. ADA 

CE2401I.ADA 

CE2401J. ADA 

CE2405B. ADA 

CE2407A. ADA 

If  CREATE  with  mode  INFILE  is  supported  for  direct  access  files,  then 
the  following  test  should  report  NOTAPPLICABLE: 

CE2102I . ADA 


If  OPEN  with  mode  IN  FILE  is  supported  for  direct  access  files,  then 
the  following  test  sRould  report  NOT_APPLICABLE: 

CE2102T. ADA 


If  RESET  with  mode  IN  FILE  is  supported  for  direct  access  files,  then 
the  following  tests  sRould  report  NOTAPPLICABLE: 

CE2102U. ADA  CE2407B . ADA 


If  RESET  with  mode  IN_FILE  is  not  supported  for  direct  access  files, 
then  the  following  tests  should  report  N0T_APPLICABLE: 

CE2111B. ADA  CE2111G. ADA  CE2111H. ADA 
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If  USE_ERR0R  or  NAME_ERROR  is  raised  by  every  attempt  to  create  or 
open  a  direct  access  file  vith  mode  0UT_PILE  (this  is  the  appropriate 
behavior  for  an  implementation  which  does  not  support  direct  access 
files;  see  AI-00332),  then  the  following  tests  should  report 
NOT  APPLICABLE: 


CE2102B.ADA 
CE2110C. ADA 
CE2404B . ADA 
CE2408A. ADA 
CE2410B. ADA 


CE2102Y. ADA 
CE2401K. ADA 
CE2407A. ADA 
CE2409B . ADA 


CE2106B. ADA 
CE2404A. ADA 
CE2407B. ADA 
CE2410A. ADA 


If  CREATE  and  OPEN  vith  mode  OU T_FILE  is  supported  for  direct  access 
files,  then  the  following  tests  should  report  NOTAPPLICABLE: 

CE2102J. ADA  CE2102V. ADA 


If  RESET  vith  mode  0UT_FILE  is  supported  for  direct  access  files,  then 
the  following  test  should  report  NOTAPPLICABLE: 

CE2102W. ADA 


If  USEERROR  or  NAMEERROR  is  raised  by  every  attempt  to  create  or 
open  a  direct  access  file  with  mode  INOUT  FILE  (this  is  the 
appropriate  behavior  for  an  implementation  vhicK  does  not  support 
direct  access  files;  see  AI-00332),  then  the  following  tests  should 
report  NOT  APPLICABLE: 


CE2102H.TST 
CE2401F. ADA 
CE2401J. ADA 
CE2405B. ADA 


CE2109B. ADA 
CE2401H. ADA 
CE2401K. ADA 
CE2408B. ADA 


CE2401E. ADA 
CE2401I . ADA 
CE2401L. ADA 
CE2409A. ADA 


If  CREATE  and  OPEN  vith  mode  INOUT_FILE  are  supported  for  direct 
access  files,  then  the  following  tests  should  report  NOT_APPLICABLE: 

CE2102F. ADA  CE2102R. ADA 


If  RESET  to  mode  INOUT_FILE  is  supported  for  direct  access  files,  then 
the  following  test  should  report  NOT_APPLICABLE: 

CE2102S. ADA 
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If  DELETE  for  direct  access  files  is  not  supported,  then  the  following 
tests  should  report  NOT_APPLICABLE: 

CE2106B. ADA  CE2110C. ADA 


If  association  of  multiple  internal  direct  access  files  to  a  single 
external  file  is  not  supported,  then  the  following  tests  should  report 
NOTAPPLICABLE: 

CE2107F.ADA  CE2107G.ADA  CE2107H.ADA 
CE2107I . ADA  CE2110D. ADA  CE2111H. ADA 


If  USE_ERR0R  or  NAME_ERR0R  is  raised  by  every  attempt  to  create  or 
open  a  direct  access  file  (this  is  the  appropriate  behavior  for  an 
implementation  which  does  not  support  direct  access  files;  see 
AI -00332),  then  the  following  tests  should  report  NOT  APPLICABLE: 


CE2102K. ADA 
CE2104D. ADA 
CE2108G.ADA 
CE2115A. ADA 
CE2401C.ADA 


CE2103D. ADA 
CE2108C. ADA 
CE2108H. ADA 
CE2401A. ADA 
CE2406A. ADA 


CE2104C. ADA 
CE2108D. ADA 
CE2111E. ADA 
CE2401B. ADA 
CE2411A. ADA 


If  association  of  an  internal  sequential  file  and  an  internal  direct 
access  file  to  a  single  external  file  is  not  supported,  then  the 
following  tests  should  report  NOTAPPLICABLE: 

CE2107E. ADA  CE2107L. ADA 


If  the  INLINE  pragma  is  not  supported  for  PROCEDURES,  then  the 
following  tests  should  report  NOTAPPLICABLE: 

CA3004E*. ADA  EA3004C*.ADA  LA3004A*.ADA 


If  the  INLINE  pragma  is  not  supported  for  FUNCTIONS,  then  the 
following  tests  should  report  NOT_APPLICABLE: 

CA3004P*.ADA  EA3004D*.ADA  LA3004B*.ADA 


If  excessive  recursion  causes  ST0RAGE_ERR0R  to  be  raised,  then  the 
following  test  should  report  NOT  APPLICABLE: 

D64005F* . ADA 
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If  DURATION' FIRST  =  DURATION' BASE' FIRST  or  DURATION' LAST 
DURATION' BASE' LAST,  then  the  following  test  should  report 
NOT_APPLICABLE,  if  it  otherwise  executes  properly: 

C96005B . TST 


Consider  the  declaration 

TYPE  F  IS  DIGITS  SYSTEM. MAX_DIGITS; 

If  F' MACHINE  OVERFLOWS  is  false  and  2.0  *  F ' MACHINE_RADIX  ** 

F ' MACHINE_EMAX  <=  F ' BASE ' LARGE ,  then  the  following  test  should  report 
NOTAPPLICABLE  if  it  compiles  without  error: 

C4A013B. ADA 
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Package  REPORT  Specification  and  Body 


—  REPSPEC. ADA 

—  PURPOSE: 

THIS  REPORT  PACKAGE  PROVIDES  THE  MECHANISM  FOR  REPORTING  THE 
PASS/FAIL/NOT-APPLICABLE  RESULTS  OF  EXECUTABLE  (CLASSES  A,  C, 

D,  E,  AND  L)  TESTS. 

IT  ALSO  PROVIDES  THE  MECHANISM  FOR  GUARANTEEING  THAT  CERTAIN 
VALUES  BECOME  DYNAMIC  (NOT  KNOWN  AT  COMPILE-TIME). 

—  HISTORY: 

JRK  12/13/79 
JRK  06/10/80 
JRK  08/06/81 
JRK  10/27/82 
JRK  06/01/84 

PWB  07/30/87  ADDED  PROCEDURE  SPECIAL_ ACTION. 

TBN  08/20/87  ADDED  FUNCTION  LEGAL_FI LE_NAME . 

PACKAGE  REPORT  IS 

SUBTYPE  FILE_NUM  IS  INTEGER  RANGE  1..3; 

—  THE  REPORT  ROUTINES. 

PROCEDURE  TEST  —  THIS  ROUTINE  MUST  BE  INVOKED  AT  THE 

—  START  OF  A  TEST,  BEFORE  ANY  OF  THE 
—  OTHER  REPORT  ROUTINES  ARE  INVOKED. 

—  IT  SAVES  THE  TEST  NAME  AND  OUTPUTS  THE 
—  NAME  AND  DESCRIPTION. 

(  NAME  :  STRING;  —  TEST  NAME,  E.G.,  "C23001A-AB" . 

DESCR  :  STRING  —  BRIEF  DESCRIPTION  OF  TEST,  E.G., 

—  "UPPER/LOVER  CASB  EQUIVALENCE  IN  "  & 
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); 


"IDENTIFIERS". 


PROCEDURE  FAILED 


(  DESCR  :  STRING 


); 


OUTPUT  A  FAILURE  MESSAGE.  SHOULD  BE 
INVOKED  SEPARATELY  TO  REPORT  THE 
FAILURE  OF  EACH  SUBTEST  WITHIN  A  TEST. 
BRIEF  DESCRIPTION  OP  WHAT  FAILED. 
SHOULD  BE  PHRASED  AS: 

"(FAILED  BECAUSE)  ...REASON...". 


PROCEDURE  NOT_APPLICABLE  —  OUTPUT  A  NOT-APPLICABLE  MESSAGE. 

—  SHOULD  BE  INVOKED  SEPARATELY  TO  REPORT 
—  THE  NON-APPLICABILITY  OF  EACH  SUBTEST 
—  WITHIN  A  TEST. 

(  DESCR  :  STRING  —  BRIEF  DESCRIPTION  OF  WHAT  IS 

—  NOT-APPLICABLE.  SHOULD  BE  PHRASED  AS: 

—  "(NOT-APPLICABLE  BECAUSE) .. .REASON. .." . 

); 


PROCEDURE  SPECIAL  ACTION 


(  DESCR  :  STRING 


); 


OUTPUT  A  MESSAGE  DESCRIBING  SPECIAL 
ACTIONS  TO  BE  TAKEN. 

SHOULD  BE  INVOKED  SEPARATELY  TO  GIVE 
EACH  SPECIAL  ACTION. 

BRIEF  DESCRIPTION  OF  ACTION  TO  BE 
TAKEN. 


PROCEDURE  COMMENT  —  OUTPUT  A  COMMENT  MESSAGE. 

(  DESCR  :  STRING  —  THE  MESSAGE. 

); 


PROCEDURE  RESULT;  —  THIS  ROUTINE  MUST  BE  INVOKED  AT  THE 

—  END  OF  A  TEST.  IT  OUTPUTS  A  MESSAGE 
—  INDICATING  WHETHER  THE  TEST  AS  A 
—  WHOLE  HAS  PASSED,  FAILED,  IS 
—  NOT-APPLICABLE,  OR  HAS  TENTATIVELY 
—  PASSED  PENDING  SPECIAL  ACTIONS. 


--  THE  DYNAMIC  VALUE  ROUTINES. 


--  EVEN  WITH  STATIC  ARGUMENTS,  THESE  FUNCTIONS  WILL  HAVE  DYNAMIC 
--  RESULTS. 


FUNCTION  I DENT  I NT 
(  X  :  INTEGER 
)  RETURN  INTEGER; 


AN  IDENTITY  FUNCTION  FOR  TYPE  INTEGER. 
THE  ARGUMENT. 

X. 


FUNCTION  IDENT_CHAR 

(  X  :  CHARACTER 
)  RETURN  CHARACTER; 


AN  IDENTITY  FUNCTION  FOR  TYPE 
CHARACTER. 

THE  ARGUMENT. 

X. 


! 
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FUNCTION  IDENT_BOOL 
(  X  :  BOOLEAN 
)  RETURN  BOOLEAN; 

FUNCTION  IDENT_STR 
(  X  :  STRING 
)  RETURN  STRING; 

FUNCTION  EQUAL 

(  X,  Y  :  INTEGER 
)  RETURN  BOOLEAN; 


—  AN  IDENTITY  FUNCTION  FOR  TYPE  BOOLEAN. 

—  THE  ARGUMENT. 

—  X. 

—  AN  IDENTITY  FUNCTION  FOR  TYPE  STRING. 

—  THE  ARGUMENT. 

—  X. 

—  A  RECURSIVE  EQUALITY  FUNCTION  FOR  TYPE 

—  INTEGER. 

—  THE  ARGUMENTS. 

—  X  -  Y. 


—  OTHER  UTILITY  ROUTINES. 


FUNCTION  LEGAL_FIL£  NAME  —  A  FUNCTION  TO  GENERATE  LEGAL  EXTERNAL 

—  FILE  NAMES. 

(  X  :  FILE_NUM  :=  1;  —  DETERMINES  FIRST  CHARACTER  OF  NAME. 

NAM  :  STRING  ""  —  DETERMINES  REST  OF  NAME. 

)  RETURN  STRING;  —  THE  GENERATED  NAME. 


END  REPORT; 
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—  REPBODY. ADA 


—  HISTORY: 

DCB  04/27/80 
JRK  6/10/80 
JRK  11/12/80 
JRK  8/6/81 
JRK  10/27/82 
JRK  6/1/84 
JRK  11/18/85 
PVB  07/29/87 

TBN  08/20/87 


ADDED  PRAGMA  ELABORATE. 

ADDED  STATUS  ACTION_REQUIRED  AND 
PROCEDURE  SPECIAL_ACTION. 

ADDED  FUNCTION  LEGAL  FILE  NAME. 


VITH  TEXT_I0; 

USE  TEXT_I0; 

PRAGMA  ELABORATE  (TEXT_I0); 

PACKAGE  BODY  REPORT  IS 

TYPE  STATUS  IS  (PASS,  FAIL,  DOES_NOT_APPLY,  ACTION_REQUIRED) ; 
TESTSTATUS  :  STATUS  FAIL; 

MAX_NAHE_LEN  :  CONSTANT  15;  —  MAXIMUM  TEST  NAME  LENGTH. 

TESTNAME  :  STRING  ( 1 . . MAX_NAME_LEN ) ; 

NONAME  :  CONSTANT  STRING  (1..7)  "NO  NAME"; 

TESTNAMELEN  :  INTEGER  RANGE  0 . . MAX_NAME_LEN  :»  0; 

PROCEDURE  PUTMSG  (MSG  :  STRING)  IS 

—  WRITE  MESSAGE.  LONG  MESSAGES  ARE  FOLDED  (AND  INDENTED). 
MAXLEN  :  CONSTANT  INTEGER  RANGE  50.. 150  72;  —  MAXIMUM 

—  OUTPUT  LINE  LENGTH. 

INDENT  :  CONSTANT  INTEGER  TEST_NAME_LEN  +9;  —  AMOUNT  TO 

—  INDENT  CONTINUATION  LINES. 

I  :  INTEGER  :=  0;  —  CURRENT  INDENTATION. 

M  :  INTEGER  :=.  MSG 'FIRST;  —  START  OF  MESSAGE  SLICE. 

N  :  INTEGER;  —  END  OF  MESSAGE  SLICE. 

BEGIN 

LOOP 

IP  I  +  (MSG' LAST-M+1)  >  MAXLEN  THEN 
N  M  +  (MAX  LEN-I )  -  1; 

IF  MSG  (N)  /«“'  '  THEN 

WHILE  N  >*  M  AND  THEN  MSG  (N+l)  /-  '  '  LOOP 
N  :  ■  N  -  1 ; 

END  LOOP; 

IF  N  <  M  THEN 

N  : «  M  +  (MAX_LEN-I)  -  1; 

END  IF; 

END  IF; 

ELSE  N  :»  MSG' LAST; 

END  IF; 
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SET_C0L  (STANDARD_OUTPUT,  COUNT  (I+l)); 

PUT_LINE  ( STANDARD_OUTPUT ,  MSG  (M..N)); 

I  INDENT; 

M  :=  N  1; 

WHILE  M  <-  MSG' LAST  AND  THEN  MSG  (M)  -  '  '  LOOP 
M  M  +  1; 

END  LOOP; 

EXIT  WHEN  M  >  MSG' LAST; 

END  LOOP; 

END  PUT_MSG; 

PROCEDURE  TEST  (NAME  :  STRING;  DESCR  :  STRING)  IS 
BEGIN 

TEST_STATUS  PASS; 

IF  NAME' LENGTH  <-  MAX  NAME  LEN  THEN 
TEST_NAME_LEN  : -~NAMEr LENGTH ; 

ELSE  TEST_NAME_LEN  MAX_NAME_LEN ; 

END  IF; 

TESTNAME  ( 1 . . TEST  NAME_LEN) 

NAME  (NAME' FIRST  . .  NAME' FIRST+TEST_NAME_LEN-1) ; 
PUTMSG  (""); 

PUTMSG  (" -  "  &  TEST_NAME  ( 1 . . TEST_NAME_LEN)  &  "  "  & 

DESCR 

END  TEST; 

PROCEDURE  COMMENT  (DESCR  :  STRING)  IS 
BEGIN 

PUTMSG  ("  -  "  &  TESTNAME  ( 1 . . TESTNAMELEN)  &  "  "  & 

DESCR  &"."); 

END  COMMENT; 

PROCEDURE  FAILED  (DESCR  :  STRING)  IS 
BEGIN 

TEST_STATUS  FAIL; 

PUTMSG  ("  *  "  &  TEST_NAME  ( 1 . . TEST_NAME_LEN )  &  ”  "  & 

DESCR  &  "."); 

END  FAILED; 

PROCEDURE  NOTAPPLICABLE  (DESCR  :  STRING)  IS 
BEGIN 

IF  TEST  STATUS  -  PASS  OR  TEST_STATUS  *  ACTION_REQUIRED  THEN 
TEST_STATUS  s-  DOES_NOT_APPLY; 

END  IF; 

PUT  MSG  ("  +  "  (,  TEST_NAME  (1 .  .TEST  NAME_LEN)  &  "  "  & 

DESCR  &  "."); 

END  NOT_APPLICABLE ; 

PROCEDURE  SPECIAL  ACTION  (DESCR  :  STRING)  IS 
BEGIN 

IF  TEST  STATUS  =  PASS  THEN 

TEST_STATUS  ACTION_REQUIRED ; 

END  IF; 


C-5 


REPORT  Package  Body 


PUT_MSG  ("  !  "  &  TEST  NAME  ( 1 . . TEST_NAME_LEN )  &  "  "  & 

DESCR  &  "."); 

END  SPECIAL_ACTION; 

PROCEDURE  RESULT  IS 
BEGIN 

CASE  TEST_STATUS  IS 
WHEN  PASS  => 

PUT_MSG  ("«—  "  &  TEST_NAME  ( 1 . . TEST_NAME_LEN)  & 

"  PASSED  . . 

WHEN  DOES  NOT  APPLY  -> 

PUT_MSG  T"++++  "  &  TEST  NAME  ( 1 . . TEST_NAME_LEN)  & 

"  NOT-APPLICABLE  ++++++++++++++++++++."); 

WHEN  ACTION  REQUIRED  «> 

PUT_MSG  ("!!!!  "  &  TEST  NAME  ( 1 . . TEST  NAME  LEN)  A 
"  TENTATIVELY  PASSED  !!!!!!! T !!! I T !!!.") ; 
PUT_MSG  ("!!!!  "  &  <1. .TEST_NAME  LEN  ->  '  ')  & 

"  SEE  '!'  COMMENTS  FOR  SPECIAL  NOTES!!"); 

WHEN  OTHERS  => 

PUT_MSG  ("****  "  &  TEST  NAME  (1. .TESTNAMELEN)  & 

"  FAILED  ****************************,”)• 

END  CASE; 

TEST_STATUS  :*  FAIL; 

TE ST_NAME_LEN  NO_NAME' LENGTH; 

TEST_NAME  ( 1 . . TEST  NAME_LEN)  :»  NO_NAME ; 

END  RESULT; 

FUNCTION  IDENT_INT  (X  j  INTEGER) 

BEGIN 

IF  EQUAL  (X,  X)  THEN 
RETURN  X; 

END  IF; 

RETURN  0; 

END  IDENT_INT; 

FUNCTION  IDENT_CHAR  (X  :  CHARACTER)  RETURN  CHARACTER  IS 
BEGIN 

IF  EQUAL  (CHARACTER' POS(X),  CHARACTER' POS(X) )  THEN  —  ALWAYS 

—  EQUAL. 

RETURN  X;  —  ALWAYS  EXECUTED. 

END  IF; 

RETURN  'O';  —  NEVER  EXECUTED. 

END  IDENT_CHAR; 

FUNCTION  IDENT  BOOL  (X  :  BOOLEAN)  RETURN  BOOLEAN  IS 
BEGIN 

IF  EQUAL  (BOOLEAN' POS(X),  BOOLEAN' POS(X) )  THEN  —  ALWAYS 

—  EQUAL. 

RETURN  X;  —  ALWAYS  EXECUTED. 

END  IF; 

RETURN  FALSE;  —  NEVER  EXECUTED. 

END  IDENT  BOOL; 


RETURN  INTEGER  IS 

—  ALWAYS  EQUAL. 

—  ALWAYS  EXECUTED. 

—  NEVER  EXECUTED. 
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FUNCTION  IDENT_STR  (X  :  STRING)  RETURN  STRING  IS 
BEGIN 

IF  EQUAL  (X' LENGTH,  X' LENGTH)  THEN  —  ALVAYS  EQUAL. 

RETURN  X;  --  ALWAYS  EXECUTED. 

END  IF; 

RETURN  —  NEVER  EXECUTED. 

END  IDENT_STR; 

FUNCTION  EQUAL  (X,  Y  :  INTEGER)  RETURN  BOOLEAN  IS 

REC  LIMIT  :  CONSTANT  INTEGER  RANGE  1..100  3;  —  RECURSION 

—  LIMIT. 

Z  :  BOOLEAN;  —  RESULT. 

BEGIN 

IF  X  <  0  THEN 

IF  Y  <  0  THEN 

Z  :»  EQUAL  (-X,  -Y) ; 

ELSE  Z  :*  FALSE; 

END  IF; 

ELSIF  X  >  REC  LIMIT  THEN 

Z  :=  EQUAL  (REC_LIMIT,  Y-X+RECLIMIT) ; 

ELSIF  X  >  0  THEN 

Z  EQUAL  (X-l,  Y-l); 

ELSE  Z  :=.  Y  =  0; 

END  IF; 

RETURN  Z; 

EXCEPTION 

WHEN  OTHERS  => 

RETURN  X  =*  Y; 

END  EQUAL; 

FUNCTION  LEGAL_FILE_NAME  (X  :  FILE  NUM  :=  1; 

NAM  :  STRING  :=.  ”") 

RETURN  STRING  IS 
SUFFIX  ;  STRING  (2.. 6); 

BEGIN 

IF  NAM  -  ""  THEN 

SUFFIX  TEST_NAME(3. .7); 

ELSE 

SUFFIX  :«  NAM(3. . 7) ; 

END  IF; 


CASE  X  IS 

WHEN  1  >>  RETURN 
WHEN  2  ->  RETURN 
WHEN  3  »>  RETURN 
END  CASE; 

END  LEGAL  FILE  NAME; 


('X'  &  SUFFIX); 
('Y'  &  SUFFIX); 
('Z'  &  SUFFIX); 


BEGIN 


TEST_NAME_LEN  :=  NO  NAME' LENGTH; 

TEST  NAME  (1 . .TEST  NAME  LEN)  NO  NAME; 
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END  REPORT; 


,  - .  - .  - .  * .  - 


APPENDIX  D 


Procedure  CHECKFILE  Body 


—  CHECKFILE. ADA 

—  THIS  IS  A  PROCEDURE  USED  BY  MANY  OF  THE  CHAPTER  14  TESTS  TO  CHECK  THE 

—  CONTENTS  OF  A  TEXT  FILE. 

—  THIS  PROCEDURE  ASSUMES  THE  FILE  PARAMETER  PASSED  TO  IT  IS  AN  OPEN 

—  TEXT  FILE. 

—  THE  STRING  PARAMETER  CONTAINS  THE  CHARACTERS  THAT  ARE  SUPPOSED  TO  BE 

—  IN  THE  TEXT  FILE.  A  '#'  CHARACTER  IS  USED  IN  THE  STRING  TO  DENOTE 

—  THE  END  OF  A  LINE.  A  ' CHARACTER  IS  USED  TO  DENOTE  THE  END  OF  A 

—  PAGE.  A  CHARACTER  IS  USED  TO  DENOTE  THE  END  OF  THE  TEXT  FILE. 

—  THESE  SYMBOLS  SHOULD  NOT  BE  USED  AS  TEXT  OUTPUT. 

--  SPS  11/30/82 

—  JBG  2/3/83 

WITH  REPORT;  USE  REPORT; 

WITH  TEXTIO;  USE  TEXT_IO; 

PROCEDURE  CHECKFILE  (FILE:  IN  OUT  FILE_TYPE;  CONTENTS  :  STRING)  IS 
X  :  CHARACTER; 

COLCOUNT  :  POSITIVE  COUNT  1; 

LINECOUNT  :  POSITIV2_COUNT  1; 

PAGECOUNT  :  POSITIVE  COUNT  1; 

TRAILING_BLANKS_MSG  WRITTEN  :  BOOLEAN  FALSE; 

STOPPROCESSING  :  EXCEPTION; 

PROCEDURE  CHECK_END  OF_LINE  ( EXPECT_END_OF  PAGE  :  BOOLEAN)  IS 
BEGIN 

--  SKIP  OVER  ANY  TRAILING  BLANKS.  AN  IMPLEMENTATION  CAN  LEGALLY 
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Procedure  CHECKFILE  Body 


—  APPEND  BLANKS  TO  THE  END  OF  ANY  LINE. 

WHILE  NOT  END_OF_LINE  (FILE)  LOOP 
GET  (FILE,  X); 

IF  X  /.  '  '  THEN 

FAILED  ("FROM  CHECK  FILE:  END  OF  LINE  EXPECTED  -  "  & 
X  &  "  ENCOUNTERED"); 

RAISE  STOP_PROCESSING ; 

ELSE 

IF  NOT  TRAILING  BLANKS  MSG  WRITTEN  THEN 
COMMENT  ("FROM  CHECK_FILE:  "  & 

"THIS  IMPLEMENTATION  PADS  "  & 

"LINES  WITH  BLANKS"); 

TRAILING_BLANKS  MSG_ WRITTEN  TRUE; 

END  IF; 

END  IF; 

END  LOOP; 

IF  LINECOUNT  U  LINE  (FILE)  THEN 
FAILED  ("FROM  CHECKJTLE:  "  & 

"LINE  COUNT'INCORRECT  -  EXPECTED  "  & 

POSITIVE  COUNT' IMAGE (LINE_COUNT)  & 

"  GOT  FROM  FILE  "  & 

POSITI VE_COUNT ' IMAGE ( LINE ( FILE) ) ) ; 

END  IF; 

—  NOTE:  DO  NOT  SKIP  LINE  WHEN  AT  END  OF  PAGE  BECAUSE  SKIP  LINE  WILL 

ALSO  SKIP  THE  PAGE  TERMINATOR.  SEE  RM  14.3.5  PARAGRAPH  1. 

IF  NOT  EXPECT  END  OF  PAGE  THEN 
IF  END_OF_PAGE  IFILE)  THEN 

FAILED  ("FROM  CHECK_FILE:  PREMATURE  END  OF  PAGE"); 
RAISE  STOP  PROCESSING; 

ELSE 

SKIPLINE  (FILE); 

LINE  COUNT  :=»  LINE_COUNT  +  1; 

END  IF; 

END  IF; 

COL_COUNT  : a  1 ; 

END  CHECK_END_OF_LINE; 

PROCEDURE  CHECK_END_OP  PAGE  IS 
BEGIN 

IF  NOT  END  OF  PAGE  (FILE)  THEN 

FAILED  ("FROM  CHECK  FILE:  "  & 

"END  OF_PAGE  NOT  WHERE  EXPECTED"); 

RAISE  STOP  PROCESSING; 


ELSE 

IF  PAGE  COUNT  /-  PAGE  (FILE)  THEN 


Procedure  CHECKFILE  Body 


"  GOT  FROM  FILE  "  & 

POSITIVE  COUNT' IMAGE  (PAGE( FILE) ) ) ; 


END  IF; 


SKIP_PAGE  (FILE); 

PAGE_COUNT  PAGE_COUNT  +  1; 

LINE_COUNT  1; 

END  IF; 

END  CHECK  END  OF  PAGE; 


BEGIN 


RESET  (FILE,  IN  FILE); 
SET_LINE_LENGTH"(STANDARD_OUTPUT,  0); 
SET  PAGE  LENGTH  (STANDARD  OUTPUT,  0); 


FOR  I  IN  1 


CONTENTS' LENGTH  LOOP 


BEGIN 

CASE  CONTENTS  (I)  IS 
VHEN  '#'  -> 

CHECK_END  OF  LINE  (CONTENTS  (I  +  1)  -  '@'); 

VHEN  '@'  «> 

CHECK  END_OF_PAGE ; 

VHEN  'X'  -> 

IF  NOT  END  OF  FILE  (FILE)  THEN 

FAILED  ("FROM  CHECK_FILE:  "  & 

"END_OF_FILE  NOT  VHERE  EXPECTED"); 
RAISE  STOPPROCESSING; 

END  IF; 

VHEN  OTHERS  => 

IF  COLCOUNT  /-  COL(FILE)  THEN 

FAILED  ("FROM  CHECK  FILE:  "  & 

"COL  COUNT  INCORRECT  -  "  & 
"EXPECTED  "  &  POSITIVE_COUNT ' 

IMAGE (COL_COUNT)  &  "  GOT  FROM  "  & 
"FILE  "  &  POSITIVECOUNT' IMAGE 
(COL(FILE))); 

END  IF; 

GET  (FILE,  X); 

COL  COUNT  :«  COL  COUNT  +  1; 

IF  X  /-  CONTENTS  (I)  THEN 

FAILED( "FROM  CHECK_FILE:  "  & 

"FILE  DOES  NOT  CONTAIN  CORRECT  "  & 
"OUTPUT  -  EXPECTED  "  &  CONTENTS(I) 
&  "  -  GOT  "AX); 

RAISE  STOP_PROCESSING; 

END  IF; 

END  CASE; 

EXCEPTION 

VHEN  STOP  PROCESSING  -> 

COMMENT  ("FROM  CHECK  PILE:  "  & 
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Procedure  CHECKFILE  Body 


"LAST  CHARACTER  IN  FOLLOWING  STRING  "  & 
"REVEALED  ERROR:  "  &  CONTENTS  (1  ..  I)); 

EXIT; 

END; 


END  LOOP; 

EXCEPTION 

WHEN  STATUSERROR  -> 

FAILED  ("FROM  CHECK  FILE:  "  & 

"STATUS_ERROR  RAISED  -  FILE  CHECKING  INCOMPLETE"); 

WHEN  MODE_ERROR  *> 

FAILED  ("FROM  CHECK  FILE:  "  & 

"MODE_ERROR  RAISED  -  FILE  CHECKING  INCOMPLETE"); 

WHEN  NAME  ERROR  => 

FAILED  ("FROM  CHECKFILE:  "  & 

"NAME_ERROR  RAISED  -  FILE  CHECKING  INCOMPLETE"); 

WHEN  USE  ERROR  =«> 

FAILED  ("FROM  CHECK  FILE:  "  & 

"USE_ERROR  RAISED  -  FILE  CHECKING  INCOMPLETE"); 

WHEN  DEVICEERROR  -> 

FAILED  ("FROM  CHECK  FILE:  "  & 

"DEVI CE_ERROR  RAISED  -  FILE  CHECKING  INCOMPLETE"); 

WHEN  END  ERROR  -> 

FAILED  ("FROM  CHECK  FILE:  "  & 

"ENDERROR  RAISED  -  FILE  CHECKING  INCOMPLETE"); 

WHEN  DATA  ERROR  »> 

FAILED  ("FROM  CHECK  FILE:  "  & 

"DATA  ERROR_RAISED  -  FILE  CHECKING  INCOMPLETE"); 

WHEN  LAYOUTERROR  *> 

FAILED  ("FROM  CHECK  FILE:  "  & 

"LAYOUTERROR  RAISED  -  FILE  CHECKING  INCOMPLETE"); 

WHEN  OTHERS  => 

FAILED  ("FROM  CHECK  FILE:  "  & 

"SOME  EXCEPTION  RAISED  -  FILE  CHECKING  INCOMPLETE"); 


END  CHECK  FILE; 
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Sample  Output  Of  Acceptance  Tests 


Test  CZ1101A.ADA  should  produce  the  following  on  STANDARD_OUTPUT : 


-  NO_NAME  CZ1 101A-AB :  CHECK  REPORT  ROUTINES.  CHECKING  'COMMENT'. 

-  NO_NAME  CHECKING  'PUT_MSG'  FOR  PROPER  OUTPUT. 

-  NO_NAME  THIS  LINE  IS  EXACTLY  ' MAX_LEN'  LONG . 5... 60 _ 5... 70.. 

-  NO_NAME  THIS  COMMENT  HAS  A  WORD  THAT  SPANS  THE  FOLD  POINT.  THIS 

COMMENT  FITS  EXACTLY  ON  TVO  LINES.  ...5... 60 _ 5... 70.. 

-  NO_NAME  THIS  COMMENT  HAS  A  WORD  THAT  ENDS  AT  THE  FOLD  POINT  ...70.. 

THE  SPACES  JUST  AFTER  THE  FOLD  POINT  SHOULD  BE  GONE. 

-  NONAME  THIS  COMMENT  HAS  A  WORD  THAT  BEGINS  AT  THE  FOLD  POINT. 

THIS  SHOULD  BE  ON  THE  SECOND  LINE. 

-  NO_NAME  THIS  COMMENT  HAS  SPACES  SPANNING  THE  FOLD  POINT.  ..5... 70 

THIS  SHOULD  BE  ON  THE  SECOND  LINE. 

-  NO_NAME 

THIS_COMMENT_IS_ONE_VERY_LONG_WORD_AND_SO_IT_SHOULD_BE_S 
PLIT_AT_THE_FOLD_POINT . 

-  NONAME  CHECKING  THAT  REPORT  BODY  INITIALIZES  TO  'NONAME'  AND 

'FAILED'.  CHECKING  'RESULT'. 

**★*  no  NAME  FAILED  ***★***********★★★★★. 

-  PASSTEST  CHECKING  'TEST'  AND  'RESULT'  FOR  'PASSED'. 

-  PASSTEST  CHECKING  THAT  INDENTATION  OP  CONTINUATION  LINES  IS 

ADJUSTED  ACCORDING  TO  TEST  NAME  LENGTH. 

=  ===  PASS  TEST  PASSED  =  =  =  =  ======= . 

-  NONAME  CHECKING  'RESULT'  FOR  RESETTING  TO  'NONAME'  AND  'FAILED'. 
★***  NO  NAME  FAILED  ********************. 

-  NO~NAME  CHECKING  THAT  INDENTATION  OF  CONTINUATION  LINES  IS  ADJUSTED 

ACCORDING  TO  TEST  NAME  LENGTH. 

-  FAIL_TEST  CHECKING  'FAILED'  AND  'RESULT'  FOR  'FAILED'. 

*  FAIL_TEST  CHECKING  'FAILED'.  NOW  'RESULT'  SHOULD  BE  'FAILED'. 

****  FAIL  TEST  FAILED  ******★*************. 

-  NATEST  CHECKING  ' NOT_APP LI CABLE'  AND  'RESULT'  FOR 

'NOT-APPLICABLE' . 

+  NATEST  CHECKING  'NOT  APPLICABLE'.  NOW  'RESULT'  SHOULD  BE 
'NOT-APPLICABLE'. 

+  NA  TEST  NOT-APPLICABLE  ++  +++++++  +  +  +  +++  +  +  +++ . 

-  FAILNATEST  CHECKING  'FAILED',  ' NOT_APPLICABLE' ,  AND  'RESULT'  FOR 

'FAILED'. 

-  FAILNATEST  CHECKING  ' NOT_APPLICABLE' .  NOW  'RESULT'  SHOULD  BE 

'NOT-APPLICABLE' . 

+  FAIL_NA_TEST  CHECKING  'FAILED'.  NOW  'RESULT'  SHOULD  BE  'FAILED'. 

*  FAIL_NA_TEST  CHECKING  ' NOT_APPLICABLE' .  NOW  'RESULT'  SHOULD  STAY 

'FAILED'. 

****  FAIL  NA  TEST  FAILED  ********************. 

-  NO  NAME_END  CZ1101A. 
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Sample  Output  Of  Acceptance  Tests 


Test  CZ1103A.ADA  should  produce  the  following  on  STANDARD_OUTPUT : 


-  CZ1103A  CHECK  THAT  PROCEDURE  CHECK  FILE  WORKS. 

-  CZ1103A  BEGIN  TEST  WITH  AN  EMPTY  FILE. 

-  CZ1103A  BEGIN  TEST  WITH  A  FILE  WITH  BLANK  LINES. 

-  CZ1103A  BEGIN  TEST  WITH  A  FILE  WITH  BLANK  LINES  AND  PAGES. 

-  CZ1103A  BEGIN  TEST  WITH  A  FILE  WITH  TRAILING  BLANKS. 

-  CZ1103A  FROM  CHECK_FILE:  THIS  IMPLEMENTATION  PADS  LINES  WITH 

BLANKS. 

-  CZ1103A  BEGIN  TEST  WITH  A  FILE  WITHOUT  TRAILING  BLANKS. 

-  CZ1103A  BEGIN  TEST  WITH  A  FILE  WITH  AN  END  OF  LINE  ERROR. 

*  CZ1103A  FROM  CHECK_FILE:  END  OF  LINE  EXPECTED  -  E  ENCOUNTERED. 

-  CZ1103A  FROM  CHECK_FILE:  LAST  CHARACTER  IN  FOLLOWING  STRING 

REVEALED  ERROR:  THIS  LINE  WILL  CONTAIN  AN  #. 

-  CZ1103A  BEGIN  TEST  WITH  FILE  WITH  END  OF  PAGE  ERROR. 

*  CZ1103A  FROM  CHECK_FILE :  END_OF_PAGE  NOT  WHERE  EXPECTED. 

-  CZ1103A  FROM  CHECK  FILE:  LAST  CHARACTER  IN  FOLLOWING  STRING 

REVEALED  ERROR:  THIS  LINE  WILL  CONTAIN  AN  @. 

-  CZ1103A  BEGIN  TEST  WITH  FILE  WITH  END  OF  PILE  ERROR. 

*  CZ1103A  FROM  CHECK_FILE:  END  Of_FILE  NOT  WHERE  EXPECTED. 

-  CZ1103A  FROM  CHECK_FILE:  LAST  CHARACTER  IN  FOLLOWING  STRING 

REVEALED  ERROR:  THIS  LINE  WILL  CONTAIN  AN  X. 

-  CZ1103A  BEGIN  TEST  WITH  FILE  WITH  INCORRECT  DATA. 

*  CZ1103A  FROM  CHECK_FILE:  FILE  DOES  NOT  CONTAIN  CORRECT  OUTPUT  - 

EXPECTED  C  -  GOT  I. 

-  CZ1103A  FROM  CHECK  FILE:  LAST  CHARACTER  IN  FOLLOWING  STRING 

REVEALED  ERROR:  LINE  WITH  C. 

****  CZ1103A  FAILED  ********************. 


E-3 


